Visual Basic在Word 2010中 - 打开目录 - 相对路径

Question

我正在创建一个word文档，并且在解决打开特定目录的代码时遇到问题。 基本上，我会在一个USB驱动器或DVD上的一堆视频文件放在单独的文件夹中，当单击命令按钮时，我希望它在Windows资源管理器窗口中打开相关目录。

我做了一些谷歌搜索，并用下面的代码上来：

文件夹名= “C：\ WINDOWS”

的TaskID =壳牌（ “explorer.exe的” &文件夹名称，vbNormalFocus）

现在唯一的问题是我需要将路径引用从绝对路径更改为相对路径，因为我将在多台计算机上运行USB驱动器或DVD上的所有内容。

我已经尝试了相对路径引用的每一个可能的迭代，但我似乎无法得到它的工作。这些文件夹只是文档文档所在的子目录。

任何人都有任何线索，因为我可以将上述代码更改为相对而非绝对路径引用？

Answer 1

我觉得这样的事情可能是你在找什么：

FolderName = ActiveDocument.Path & "\SubFolder" 

TaskID = Shell("explorer.exe " & FolderName, vbNormalFocus) 

假设您的文档是活动之一，否则你可能需要通过Documents收集来搜索正确的。