用vba对word操作进行处理
我想比较两个文档,用word里面的比较选项就可以实现,但是它有几个步骤,我想做一个批处理命令按钮,只要按一下按键,就可以实现这个功能,请问各位大侠,用VBA怎么实现?
[最优解释]
CompareSideBySideWith 方法
参阅应用于示例特性
打开两个窗口并以并排方式排列。返回一个 Boolean 类型的值。
expression.CompareSideBySideWith(Document)
expression 必需。表达式返回值为“应用于”列表中的一个对象。
Document Variant,必需。要在并排窗口中查看的文档。
说明
不能将 Application 对象或 ActiveDocument 属性用于 CompareSideBySideWith 方法。
示例
下列示例将两个新文档排列在相邻的窗口中。
Dim objDoc1 As Word.Document
Dim objDoc2 As Word.Document
Set objDoc1 = Documents.Add
Set objDoc2 = Documents.Add
objDoc2.Activate
objDoc2.Windows.CompareSideBySideWith objDoc1
Windows.ResetPositionsSideBySide