Book

対象ブックが存在するか確認(Dir利用)

'ブック確認Sub 対象ブックが存在するか確認_D() Dim filePath As String filePath = "C:\Sample\Book1.xlsx" If Dir(filePath) <> "" Then Debug.P...

対象ブックが存在するか確認(ファイルオブジェクト)

Sub 対象ブックが存在するか確認_Fso() Dim fso As Object Dim filePath As String filePath = "C:\Sample\Book1.xlsx" Set fso = CreateObjec...

ブックが開かれているか確認

Sub ブックが開いているか確認() Dim wb As Workbook Dim flag As Boolean For Each wb In Workbooks If wb.Name = "Book1.xlsx" Then flag =...

ブックを閉じる

'上書き保存Workbooks("Dummy.xlsx").Close SaveChanges:=True'保存せずに保存Workbooks("Dummy.xlsx").Close SaveChanges:=False

ブックを開く

'指定したブックを開く(ドライブ名・・・拡張子)Workbooks.Open Filename:="C:\・・・\test.xlsx"'指定したブックを開き、オブジェクト指定Dim wb as As WorkbookSet wb1 = Wo...