Access: 运行时错误 424,携带 ActiveWorkbook.path
Access: 运行时错误 424,携带 ActiveWorkbook.path
我正在尝试使用以下代码打开包含我的Access数据库的目录:
Dim path As String path = ActiveWorkbook.path & "\" Shell "cmd /C start """" /max """ & path & """", vbHide
正如@AnorZaken在这里所建议的那样。
然而,第二行引发了运行时错误"424 对象所需"。
当我使用一些固定的路径(例如path = "C:\"
)时,一切正常运行。
Access: 运行时错误424 with ActiveWorkbook.Path
问题原因:
在Access中,ActiveWorkbook是用于Excel的对象,而不是Access。因此,在Access中使用ActiveWorkbook.Path会导致运行时错误424。正确的Access对象应该是CurrentProject。
解决方法:
将ActiveWorkbook.Path替换为CurrentProject.Path即可解决该问题。
代码示例:
'path = ActiveWorkbook.path & "\" path = CurrentProject.Path & "\"
以上代码将使用CurrentProject对象获取当前Access数据库的路径,并将其存储在变量path中。这样就可以正确地获取Access数据库的路径,而不会出现运行时错误424。