打开一个word文档并用vbscript将它保存到另一个文件夹

Question

我的工作代码可以使用 vbscript 以编程方式打开一个 word 文档，进行更改，然后保存同一个文档并关闭同一个文档。

是否可以做同样的事情，但将文档保存到另一个文件夹并关闭两个 word 实例？我稍微修改了我的原始代码，但它只关闭了保存的 word 文档的第二个实例。

显然，word 认为如果我要保存到另一个文件夹，它需要 2 个文档实例。这是我的一些原始代码：

Set objDoc = objWord.Documents.Open(objFile.Path)
'modify the document.
etc...

objDoc.SaveAs objFSO.BuildPath(strDirectory, objFSO.GetFileName(objFile.Path))
objDoc.Close

这适用于一个文档。然后我改变的就是这个，添加另一个目录而不是原来的：

objDoc.SaveAs objFSO.BuildPath(strDirectory & saveDir,  objFSO.GetFileName(objFile.Path))

我最终打开了两个相同的 word 文档，当我关闭我保存的一个时，另一个保持打开状态。

有没有简单的方法来做到这一点？

谢谢，

詹姆斯

Answer 1

最好将word文档保存在原始文件夹中，然后编写进一步的代码将其移动到另一个位置，也许使用FileSystemObject.MoveFile。不要依赖 Word 的“另存为”功能来执行此操作 - 正如您所观察到的那样，您会得到令人讨厌的副作用。