VBA～指定セルから設定した行数、列数分移動したセルを参照しよう～Excel

VBAで指定したセルから設定した行数、列数分移動したセルを参照したい時はRange.Offsetプロパティで設定できます。Offset(行数,列数)で指定できます。

下のコードを実行するとセルA1から3行下、2列右のセル、つまりセルC4に1が入力されます。

Sub test1()

Range("A1").Offset(3, 2) = 1

End Sub

指定したシートの離れたセルを参照

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

下のコードを実行するとSheet2のセルA1から3行下、2列右のセル、つまりセルC4に1が入力されます。

Sub test2()

Worksheets("Sheet2").Range("A1").Offset(3, 2) = 1

End Sub

ブックを指定して参照

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

Book1.xlsxというブックが開いた状態で下のコードを実行するとBook1.xlsxのSheet1のセルA1から3行下、2列右のセル、つまりセルC4に1が入力されます。

Sub test3()

Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("A1").Offset(3, 2) = 1

End Sub