ブック 2019.07.072024.11.02 a ブックを保存 '上書き保存 Workbooks("Dummy.xlsx").Close SaveChanges:=True '保存せずに保存 Workbooks("Dummy.xlsx").Close SaveChanges:=False a ブックを開く '指定したブックを開く(ドライブ名・・・拡張子) Workbooks.Open Filename:="C:\・・・\test.xlsx" '指定したブックを開き、オブジェクト指定 Dim wb as As Workbook Set wb1 = Workbooks.Open(Filename:="C:\・・・\test.xlsx")