hiroton
2024/07/24 (水) 09:00:50
0f429@f966d
ファイル名が正しくありません
なので、とりあえずファイル名が正しいのか(VBAが正しくファイルを認識できているのか)調べてみては?
また、Accessファイルを単純な場所において直接指定して実行できるのか確認してみるのもいいと思います
Debug.Print DBpath
Debug.Print "FileName = "; Dir(DBpath)
If Dir(DBpath) = "" Then MsgBox "ファイルを認識できません"
DBpath = "C:Data\0715単価管理.accdb"
adoCn.Open "Provider=Microsoft.ACE.OLEDB.16.0;Data Source=" & DBpath & ";"
通報 ...