Excel CurrentProject.Path,运行时错误424

之前我从来没有在VBA中做过任何事情。 当我的整个仪表板工作时.accdb在C驱动器,但现在我想要它在同一个文件夹作为Excel工作簿。

我得到“运行时错误”424:所需的对象“为底线底部

Dim DatabasePath As String DatabasePath = CurrentProject.Path & "\SpreadSheetData.accdb" 

为什么是这样? 谢谢你的帮助

Excel中没有CurrentProject 。 如果要引用执行代码所在的工作簿,请改用ThisWorkbook