使用变量路径打开文件夹

Question

我正在尝试打开宏工作簿所在的文件夹。

在本例中，它位于文件夹“H:\Projects\IWA_Populate”中。但是，工作簿可以位于任何文件夹位置。

如果我指定如下静态路径，它将打开目标文件夹 IWA_Populate：

Shell "explorer.exe H:\Projects\IWA_Populate", vbNormalFocus

但是，如果我用下面这样的变量替换路径，它只会打开“我的文档”文件夹。

Shell "explorer.exe file_path", vbNormalFocus

这是我初始化 file_path 的代码：

Public file_path As String
Public xl As Excel.Application
Set xl = Application: xl.DisplayAlerts = False
ActiveWorkbook.Save
file_path = xl.ActiveWorkbook.Path
'Shell "explorer.exe H:\Projects\IWA_Populate", vbNormalFocus
Shell "explorer.exe file_path", vbNormalFocus
MsgBox file_path

消息框用于测试file_path 是否设置为正确的完整路径。

Answer 1

将file_path 移出引号并使用与符号&。虽然它在引号内，但它不再是变量file_path，而是String 文字"file_path"。

变化：

Shell "explorer.exe file_path", vbNormalFocus

到

Shell "explorer.exe " & file_path, vbNormalFocus

---

编辑：正如@TimWilliams 指出的，您可以将其调整为

Shell "explorer.exe """ & file_path & """", vbNormalFocus

允许文件名中包含空格。