オブジェクト
階層構造になっています。Application→Workbooks→Worksheets→Range
変数
変数にオブジェクトをとり出す。Sub test_00() Dim testBook As Workbook Dim testSheet As Worksheet Dim testRange As Range Set testBook = Workbooks("テスト.xlsm") Set testSheet = testBook.Worksheets("Sheet1") Set testRange = testSheet.Range("A1") testRange.Value = 20 End Sub
直接代入
一つだけなら直接代入します。Sub test_01() Workbooks("テスト.xlsm").Worksheets("Sheet1").Range("A1").Value = 20 End Sub
0 件のコメント:
コメントを投稿