【ExcelVBA】行を削除する方法（複数行範囲・最終行まで）

VBAでエクセルシートの行を削除する方法について説明します。

行を削除する方法（１行）

行の削除はRowsプロパティのDeleteメソッドを実行します。
1行のみ削除する場合はRowsのカッコ内に行数を指定します。

'3行目を削除
Rows(3).Delete

▽マクロ実行前→実行後のイメージ
　3行目のパンの行が削除されました。

複数行を一気に削除する

複数行を削除する場合はカッコ内で何行目～何行目まで削除するのかを指定します。

'3行目～5行目を削除
Rows("3:5").Delete

▽マクロ実行前→実行後のイメージ
　3行目～5行目の行が削除されました。

2行目～最終行までを削除する

実務では「ヘッダーだけ残して2行目～最終行までを毎回削除する」などをよく使用します。
その場合は最終行を変数に取得して、2行目～最終行までを削除するように指定します。

'2行目～最終行までを削除
Dim LastRow As Integer

'最終行を変数に取得
LastRow = Cells(Rows.Count, 1).End(xlUp).Row

'2行目～最終行までを削除
Rows("2:" & LastRow).Delete

▽マクロ実行前→実行後のイメージ
　ヘッダーだけが残って2行目～最終行の13行目までが削除されました。

関連記事（行・列操作まとめ）

こちらの記事では行と列の操作をまとめています。よかったらこちらもご覧ください。

【ExcelVBA】行・列の操作まとめ（挿入Insert・削除Delete・非表示Hidden）☆複数範囲対応

エクセルVBAでよく使うシートの行や列を操作する方法についてまとめました。行・列の挿入、削除、非表示・再表示の書き方、複数行・複数列の範囲指定の書き方をそれぞれ説明しています。

learningpgm.com

2024.08.18

※コードのコピー利用について

・コードのコピーは自由におこなっていただけます。
・気を付けて作成はしていますがコードには誤りがある可能性があります。
・自身の環境で動作確認をしていますが、すべての方の環境で同様に動くことは保証できません。
・データの破損等の責任は負いかねますのでご自身の責任のもとお使いください。
・記事の内容は適宜変更することがありますのでご了承ください。