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

Question

我有工作代码，使用vbscript以编程方式打开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的“另存为”功能来执行此操作 - 因为您已经观察到会产生令人讨厌的副作用。