显示修订标记,以表明指定的文档与另一个文档的区别。
expression.Compare(Name, AuthorName, CompareTarget, DetectFormatChanges, IgnoreAllComparisonWarnings, AddToRecentFiles)
expression 必需。该表达式返回一个 Document 对象。
Name String 类型,必需。与指定文档作比较的文档的名称。
AuthorName Variant 类型,可选。与比较结果生成的区别相关联的审阅者姓名。如果没有指定,则默认值为修订文档的作者名或字符串“Comparison”(如果没有提供作者信息)。
CompareTarget Variant 类型,可选。比较的目标文档。可以是下列任意 WdCompareTarget 常量。
WdCompareTarget 可以是下列 WdCompareTarget 常量之一: |
wdCompareTargetCurrent 将比较结果区别置于当前文档中。默认值。 |
wdCompareTargetNew 将比较结果区别置于新文档中。 |
wdCompareTargetSelected 将比较结果区别置于目标文档中。 |
DetectFormatChanges Boolean 类型,可选。如果为 True(默认值),则比较结果包括格式变化检测。
IgnoreAllComparisonWarnings Variant 类型,可选。如果为 True,则比较文档,而不通知用户问题。默认值是 False。
AddToRecentFiles Variant 类型,可选。如果为 True,则将文档添加至“文件”菜单中最近使用的文件列表中。
本示例将活动文档与位于 Draft 文件夹中名为“FirstRev.doc”的文档进行比较,并将比较结果区别置于一个新文档中。
Sub CompareDocument()
ActiveDocument.Compare Name:="C:\Draft\FirstRev.doc", _
CompareTarget:=wdCompareTargetNew
End Sub