VBAなら
A列の最下行を求める。最下行から上行に1行ずつ、bbbを判断して
そうであれば、行を削除。
下から上へ見ていくこと。
Sub test02()
d = Range("A65536").End(xlUp).Row
For i = d To 1 Step -1
If Cells(i, "A") = "bbb" Then
Rows(i).EntireRow.Delete
End If
Next i
End Sub
ーー
操作なら
フィルタでbbbをだし、DELETEで削除
編集ージャンプーセル選択ー空白セル
編集ー削除
マクロを使用する場合は、たとえば以下を実行することでできます。
Sub test()
Range("A1").Select
Do Until Selection.Value = ""
If Selection.Value = "BBBB" Then Rows(Selection.Row).Delete Shift:=xlUp
Selection.Cells(2, 1).Select
Loop
End Sub
お礼
皆さん、早々の回答本当にありがとうございました。 オートフィルタで解決しました。