显示修订标记,以表明指定的文档与另一个文档的区别。
语法
expression。 Compare( _Name_ , _AuthorName_ , _CompareTarget_ , _DetectFormatChanges_ , _IgnoreAllComparisonWarnings_ , _AddToRecentFiles_ , _RemovePersonalInformation_ , _RemoveDateAndTime_ )
expression 是必需的。 一个代表 Document 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| Name | 必需 | String | 与指定文档作比较的文档的名称。 |
| AuthorName | 可选 | Variant | 与比较生成的区别相关联的审阅者姓名。 如果没有指定,则默认值为修订的文档的作者姓名或字符串"Comparison"(如果没有提供作者信息)。 |
| CompareTarget | 可选 | Variant | 比较的目标文档。 可以是任何 WdCompareTarget 常量。 |
| DetectFormatChanges | 可选 | Boolean | 真 (默认值) 进行比较以包含检测到的格式更改。 |
| IgnoreAllComparisonWarnings | 可选 | Variant | 真正 比较文档,而不必通知用户有问题存在。 默认值为 False 。 |
| AddToRecentFiles | 可选 | Variant | True 将文档添加到 文件菜单上最近使用的文件列表。 |
| RemovePersonalInformation | 可选 | Boolean | 真 从批注、 修订和中返回的 文档 对象的属性对话框中删除所有用户的信息。 默认值为 False 。 |
| RemoveDateAndTime | 可选 | Boolean | 为 日期和时间戳信息从修订中移除返回的 文档 对象中。 默认值为 False。 |
示例
本示例将活动文档与位于 Draft 文件夹中名为“FirstRev.doc”的文档进行比较,并将比较结果区别置于一个新文档中。
Sub CompareDocument()
ActiveDocument.Compare Name:="C:\Draft\FirstRev.doc", _
CompareTarget:=wdCompareTargetNew
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。