OfficeType

VBA~セルを挿入しよう~Excel

VBAでセルを挿入したい場合はRange.Insertメソッドで挿入できます。

単一セルにセルを挿入

下のコードを実行するとセルA1にセルが挿入されます。

Sub test1()

Range("A1").Insert

End Sub

image-01

image-02

範囲にセルを挿入

範囲を指定したい時はRange("範囲の左上のセル:範囲の右下のセル")で指定できます。

下のコードを実行するとセルA1からセルC3の範囲にセルが挿入されます。

Sub test2()

Range("A1:C3").Insert

End Sub

image-03

image-04

指定したシートにセルを挿入

シートを指定するときはWorksheets("シート名")で指定できます。

下のコードを実行するとSheet2のセルA1にセルが挿入されます。

Sub test3()

Worksheets("Sheet2").Range("A1").Insert

End Sub

image-05

image-06

ブックを指定してセルを挿入

ブックを指定するときはWorkbooks("ブック名")で指定できます。

Book1.xlsxというブックが開いた状態で下のコードを実行するとBook1.xlsxのSheet1のセルA1にセルが挿入されます。

Sub test4()

Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("A1").Insert

End Sub