打开多个Word文档VBA Excel

Question

打开多个工作文档的最佳方法是什么？ 我想通过VBA从不同的Word文档复制/粘贴。 我应该为每个实例打开一个新实例吗？ 我确实确实需要同时激活两个工作簿，并且将在粘贴完成后关闭。

是

Set objWord1 = CreateObject("Word.Application")
Set objWord2 = CreateObject("Word.Application")
objWord1.Document.open("maindocument.docx")
obj2Word2.Document.open("seconddoc.docx")

这是最有效的方法吗？

Answer 1

您只需要打开一个应用程序实例。 然后，您可以为文档做两个单独的声明：

Dim objWord As Object
Dim doc1 As Object, doc2 As Object

Set objWord = CreateObject("Word.Application")
Set doc1 = objWord.Documents.Open("maindocument.docx")
Set doc2 = objWord.Documents.Open("seconddoc.docx")

我一般不建议这样做，但是如果您想提高技巧：

Dim doc1 As Object, doc2 As Object

With CreateObject("Word.Application")
    Set doc1 = .Documents.Open("maindocument.docx")
    Set doc2 = .Documents.Open("seconddoc.docx")
End With