VBAである文字列を含んでいるものを削除するやり方を教えていただけないでしょうか?
例えば、列Cにあいうえおを含む文字列を含んだものがあればその行を削除する。
例)列C1にあいうえおかきくけこ というデータがある場合 マクロ実行後1行目が全て削除されます。
例)列C2にあいうえお というデータがある場合 マクロ実行後2行目が全て削除されます。
お手数をおかけしますがわかるかたおりましたら型を書いていただければと思います。
よろしくお願いいたします。
文字列を含んでいる判定は InStr を使用します。
文字を含んでいればその位置を、含んでいなければ 0 を返しますので、
数値が0かそうでないかで、文字を含んでいるかどうかを判定します。
Sub DeleteC() Dim lastRow As Long lastRow = Range("C" & Rows.Count).End(xlUp).Row For r = lastRow To 1 Step -1 If InStr( Cells(r, "C").Value,"あいうえお" ) > 0 Then Rows(r).Delete End If Next End Sub
ご回答ありがとうございます。実行出来ました。