我正在创建一个word文档，我在编写打开特定目录的代码时遇到了麻烦。基本上，我将在USB驱动器或DVD上有一堆视频文件放在不同的文件夹中，当命令按钮被点击时，我希望它在windows资源管理器窗口中打开相关目录。
我做了一些谷歌搜索，得到以下代码:
文件夹名= "c:windows"
TaskID = Shell("explorer.exe " &FolderName vbNormalFocus)
现在唯一的问题是我需要将路径引用从绝对更改为相对，因为我将在多台计算机上运行USB驱动器或DVD中的所有内容。
我已经尝试了相对路径引用的每一个可能的迭代，但我似乎不能让它工作。文件夹只是word文档所在的子目录。
任何人得到任何线索，我如何能改变上面的代码是相对的，而不是绝对的路径引用?
我想这样的东西可能是你要找的:
FolderName = ActiveDocument.Path & "SubFolder"
TaskID = Shell("explorer.exe " & FolderName, vbNormalFocus)
假设您的文档是活动文档，否则您可能需要在Documents集合中搜索正确的文档