サイトについて      連絡先   検索

VBA 行を挿入する

はじめに

Excel VBA の行を挿入する方法を紹介します。

Rows.Insert メソッドか Range.Insert メソッドで行を挿入できます。

行を挿入する

Rows の引数に行番号を指定すると、その行に挿入できます。

行「2」に挿入するには Rows(2).Insert のように指定します。

Rows(2).Insert
1

Range.EntireRow を使用すると、指定したセルの行を取得できます。

セル「B2」の行に挿入するには Range("B2").EntireRow.Insert のように指定します。

Range("B2").EntireRow.Insert

行の範囲に挿入する

行の範囲「2 ~ 3」に挿入するには Range("2:3").Insert のように指定します。

Range("2:3").Insert ' 2 ~ 3 行目に挿入
Range("5:5").Insert ' 5 行目に挿入
2

指定したシートの行に挿入する

Rows.Insert とコードに書くと、アクティブなシートの行に挿入します。これは ActiveSheet.Rows.Insert の ActiveSheet が省略されています。

' どちらも同じコード
Rows(1).Insert
ActiveSheet.Rows(1).Insert

シートを指定するには Sheets の引数にシート名またはインデックスを指定します。

1

Sheet1 のシートを指定するには、Sheets("Sheet1") か Sheets(1) と書きます。

' Sheet1 の行「1」に挿入
Sheets("Sheet1").Rows(1).Insert
Sheets(1).Rows(1).Insert

' Sheet2 の行「1」に挿入
Sheets("Sheet2").Rows(1).Insert
Sheets(2).Rows(1).Insert

関連ページ