VBA～ワークブックを指定しよう～Excel

ブック名で指定

ワークブックをブック名で指定するときはWorkbooks("ブック名")で指定できます。下のコードを実行するとサンプル.xlsxのSheet1のセルA1に1が入力されます。

Sub test1()
Workbooks("サンプル.xlsx")).Worksheets("Sheet1").Range("A1") = 1
End Sub

コードが書いてあるブックを指定

コードが書いてあるブックを指定するときはThisWorkbookで指定できます。下のコードを実行するとコードが書いてあるブックのSheet1のセルA1に1が入力されます。

Sub test2()
ThisWorkbook.Worksheets("Sheet1").Range("A1") = 1
End Sub