特定の行を削除する

 

Sub test()

   ’ 3列目”A”となるデータを削除


    With Range("A1").ListObject.DataBodyRange
        .AutoFilter 3, "A"
        .EntireRow.Delete
        .AutoFilter 3
    
    End With


End Sub

 

 

実行結果

 

 

 

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

 

参考記事