マクロを使う別の方法です。 XXXの部分を特定の文字に置きかえて実行してください。 また、「特定の文字があれば」というのが、その文字列を含む、というのでなくセルの値がその文字列ならば、というのであれば、LookAt:=xlPart の部分を LookAt:=xlWhole に書き換えてください。 Sub DelLines() Dim R As Range Do Set R = ActiveSheet.Range("B:B").Find(What:="XXX", LookAt:=xlPart) If R Is Nothing Then Exit Sub R.EntireRow.Delete Loop End Sub
![エクセルで特定の行を削除したいのですが。](https://cdn-ak-scissors.b.st-hatena.com/image/square/2d01822961b64a3436d1f4aab4180310801bec0a/height=288;version=1;width=512/https%3A%2F%2Foshiete.xgoo.jp%2Fimages%2Fsp%2Fqa_recommend%2F2099_5.jpg)