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

解決


ku  2021-06-06 03:19:46  No: 149700  IP: 192.*.*.*

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

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

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

編集 削除
ポポロン  2021-06-08 02:50:58  No: 149705  IP: 192.*.*.*

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

編集 削除
健一  2021-06-17 01:17:33  No: 149729  IP: 192.*.*.*


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

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

編集 削除