セル配列内の同じものを削除する方法

私は100個以上のセルからなるコラムを持っていて、それらの中にはすべて弾丸が入っています。

すべての箇条書きを削除し、そしてテキストをセルに残すだけのマクロまたは何らかの機能を実行することができますか？

任意の助けは大歓迎です！

このワンライナーを試してください：

Sub BulletKiller()
    Cells.Replace what:=Chr(149), replacement:=""
End Sub

行頭文字がASCII 0149であると仮定します。アクティブなワークシートのすべてのセルが処理されます。すべての行頭文字、テキストの途中または行末にある行頭文字も削除されます。