Excelのファイル指定方法
■ファイル
ActiveWorkbook … 現在、アクティブなExcel
ThisWorkbook … マクロが書き込まれている自身のExcel
ActiveSheet … 現在、アクティブなシート
ThisWorkSheet … マクロが書き込まれている自身のExcel
■アクティブ化
Workbooks(sample.xlsx).Activate
■例
Dim path_n as string: string = "\sample.xlsx"
Dim WB1 As Workbook : Set WB1 = ActiveWorkbook
Dim WH1 As Worksheet: Set WH1 = ActiveWorkbook.ActiveWorkbook
Dim WB2 As Workbook : Set WB2 = Workbooks.Open(WB1.Path & "\dsmplr.xlsx")
Dim WH2 As Worksheet: Set WB2 = Workbook.Worksheets("Sheet1")