从 VBA 获取当前目录

Posted 2023-04-19

【中文标题】从 VBA 获取当前目录

【英文标题】：Get the current directory from VBA

【发布时间】：2014-02-18 13:45:39

【问题描述】：

在 VBA 中有一个ChDir 函数可以设置/更改当前目录。 用户从 Access（或 Excel）浏览其驱动器/文件夹也会影响该当前目录，即使他最终单击“取消”而没有打开任何内容。 我的问题是：在后一种情况下，我如何检索当前目录？

注意：CurrentDirectory 与 CurrentDb 的文件夹无关！

【参考方案1】：

你想要CurDir$:

?CurDir$
c:\temp

ChDir "c:\windows\"

?CurDir$
c:\windows

【讨论】：

谢谢..我觉得自己很愚蠢。应该在文档中说明！

【参考方案2】：

VBA 中ChDir 命令的补充是CurDir 函数。

【参考方案3】：

在 VBS 上

Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WScript.Echo WshShell.CurrentDirectory