ThisWorkbook.PathでExcelファイルが開けない

解決

ｋｕ 2021-06-06 12:19:46 No: 149700

workbooks.Open ThisWorkbook.Path & "*.xls"

「ファイルの保存場所が正しいかどうか確認してください」とのエラーが表示され、Excelファイルが開けない

mybookpath = ThisWorkbook.Path & "*.xlsx"
mybookpath = Dir(myBookPath)
を実行しても、同エラーが表示されるのですが、どこを直せば良いのでしょうか？

ポポロン 2021-06-08 11:50:58 No: 149705

*ではなく、正しいファイル名を入力してみてください。

健一 2021-06-17 10:17:33 No: 149729

下記を試してみてください：
Dim Filepath
Filepath = "C:¥temp¥test1.xlsx"

Dim targetWorkbook As Workbook
Set targetWorkbook = Workbooks.Open(Filepath)