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

如何将一个word文档的内容复制到另一个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"

---

好的，我知道怎么打开它。但我需要复制它的内容并粘贴到一个新的文档。。。如何操作？

只要使用

Word\u Doc.SaveAs

（一旦正确设置

Word\u Doc

），然后在其他实例下重新打开即可

可以在此处找到更多功能：