获取 Microsoft Word 中所有打开文档的文件名

Getting the filenames of all open documents in Microsoft Word

我正在尝试编写一个脚本,将所有打开的程序、文档、文件和网页保存为工作区。理想情况下,我想使用脚本来保存工作区,然后在我单击另一个脚本(即保存的工作区)后重新打开它。我有几项工作同时在做,我希望只需点击一下就可以在这些工作之间切换。我知道有多个桌面等等,但我想要一些不同的东西,这样我就不必在每次打算处理特定任务时不断地打开所有文件和页面。另外,我不想安装任何额外的软件,我只是希望它尽可能从脚本运行。

对于编码,我使用了 VBScript。我能够打开这些文件,但我不知道如何检查打开了哪些文件及其文件路径。这是我目前拥有的代码的一部分:

Set Word = GetObject("", "Word.Application")
Word. --- I'm trying to get documents to work here and to get 

提前感谢您的帮助!

这将显示当前打开的文档:

' Note: Leaving the first parameter, the pathname, empty as it's not
'       required, and passing an empty string will cause an isolated 
'       instance of Word to be loaded
Set Word = GetObject(, "Word.Application")
For Each doc In Word.Documents
    WScript.Echo "Name: " + doc.Name + ", Full name: """ + doc.FullName + """"
Next

这会为我输出以下内容,显然您的列表会因打开的内容而异:

Name: Document1, Full name: "Document1"
Name: Example Doc.docx, Full name: "C:\Files\Example Doc.docx"