初心者も簡単ブログにコピペだけ!1クリック高単価7〜42円。登録無料最短1分でスタート。

VBA For Eachで特定の文字列が入っている行を削除するコード

For each文で特定の文字が入っている行を削除する


Dim rng As Range
Dim rngs As Range

Set rngs = Range("B2:B100")
For Each rng In rngs
If rng.Value = 20 Then
    Rows(rng.Row).Delete shift:=xlUp
End If
Next

初心者も簡単ブログにコピペだけ!1クリック高単価7〜42円。登録無料最短1分でスタート。