如何在VBA宏中将远程MS Word文档与活动文档合并？

Question

前端

在“前端”中，我有一个宏链接到Word中命令栏中的按钮。 此按钮的目的是允许用户将当前文档与其以前的版本进行比较。

后端

在后端，我有一个Java EE服务器和运行有一些servlet的Alfresco。 给定文档名称后，这些servlet之一当前会返回.doc文档。 因此，我只需要使用包含我想要的版本的好名字来调用它，它就会向我返回我所需要的文档。

理想的工作流程

因此，对于用户而言，理想的工作流程如下：

• 用户打开一个MS Word文档
• 用户单击命令栏中的按钮
• 用户获取一个新文档，该文档包含其当前文档和服务器返回的文档的合并版本

我想知道什么

对我来说最具挑战性的部分是有关VB6的部分。 我知道可以将文档与ActiveDocument.Merge FileName:="path_to_file", MergeTarget:=wdMergeTargetSelected但是

1. 如何调用返回可在VB脚本中使用的Word文档的servlet？
2. 如何解释此调用的结果，以便可以将其粘贴到Merge函数并创建合并的文档？

谢谢你的帮助。

Answer 1

您使用Documents.Open打开Documents.Open 。 有关不同选项和参数的帮助，请参阅F1帮助。

Option Explicit

Sub OpenDoc()

    Dim oDoc As Document

    Set oDoc = Documents.Open(FileName:="FILENAME.docx")

    Call oDoc.Merge("PATH-TO-OTHER-DOCUMENT.docx")

    Set oDoc = Nothing

End Sub