vb6 - 将word文档的内容复制到另一个

Question

如何将一个word文档的内容复制到另一个？只是文字...

我像这样打开它：

Dim Word_App     As Word.Application
Dim Word_Doc     As Word.Document

Set Word_App = New Word.Application
Set Word_Doc = Word_App.Documents.Add(DocumentType:=wdNewBlankDocument)

Word_App.Documents.Open "C:\test.rtf"

好的，我知道如何打开它。但我需要复制它的内容并将其粘贴到一个新文档中......如何？

Answer 1

只需使用Word_Doc.SaveAs（一旦您Word_Doc正确设置），然后在不同的实例下重新打开。

更多功能可以在这里发现：http: //msdn.microsoft.com/en-us/library/office/ff840898.aspx