打開多個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