行削除する【ExcelVBA】

行削除する
その他
関連記事

行削除する

VBAで下記記述を行う事で、エクセルの行を削除する事が出来ます。

Public Sub sample()

    '----------
    'ActiveWorkBook.ActiveSheetの行削除の場合
    '----------
    '■2行目を削除
    Rows(2).Delete
    
    '■2行目～3行目を削除
    Rows("2:3").Delete

    '----------
    '任意のブック、任意のシートの行削除の場合
    '----------
    '■ThisWorkbook シート「設定シート」の2行目を削除
    ThisWorkbook.Worksheets("設定シート").Rows(2).Delete
    
    '■ブック「Book1」のシート「Sheet1」の2行目～3行目を削除
    Workbooks("Book1").Worksheet("Sheet1").Rows("2:3").Delete

End Sub

その他

行削除が多ければ、画面がちらつきます。
ちらつきが気になる(もしくは速度を求める)場合は、下記処理を追加してください。
ExcelVBAマクロ「マクロ処理を高速化する」をパーツ化する。
シート名やブック名は省略した方が可読性、メンテナンス性に優れます。
マクロ初級者必読-ワークシート名を変数にSetし、短い名前で利用する
Clearメソッドとの違いがあります。
Clearは行がそのまま残る。(クリアした行が空白行となる)
Deleteは行削除され、削除した行が詰められて表示される。
Clear 1 2行目をClear 1
2 →
3 3
4 4
Delete 1 2行目をDelete 1
2 → 3
3 4
4