他にも方法がある為、以下のリンクも併せてチェックした上で何を使うか決めること VBA エラー処理 - ray88’s diary ファイルが既に開かれているかどうか調べる - ray88’s diary VBA 特定の名前のブックが開かれているか確認する - ray88’s diary Excel VBA …

Function fncIsExistsFile(targetPath As String) As Boolean '---------------------------------------------------- '機能：指定されたファイルパスが存在するか確認し ' 結果をTrueまたはFalseで返す '引数1:ファイルパス '----------------------------…

Function fncIsExistsDir(targetPath As String) As Boolean '---------------------------------------------------- '機能：指定されたフォルダパスが存在する '引数1:フォルダパス '戻り値：フォルダの有無をTrueかFalseで返す '------------------------…

■ ダイアログを表示してフォルダを選択する部品 Function fncGetFolderPath() As String '---------------------------------------------------------------- '機能：フォルダ選択ダイアログを表示し、選択したフォルダパスを返す '戻り値：フォルダパス '-…

■Access VBA でExcelを操作する Sub ExcelTest() Dim xlApp As Object Dim wb As Object Dim vPath As String 'Excel Applicationをインスタンス化 Set xlApp = CreateObject("Excel.Application") '対象ブックのパスを格納 vPath = "C:\Users\デスクトップ\…