Word VBA - CompareDocuments - 如何检查修订对象的内容

Question

将word文档与Application.CompareDocuments方法进行比较后，我需要检查找到的所有修订版本，以便仅保留那些“真正的”文本更改。 感谢

Answer 1

因此，解决方案是对“文本”进行一些检查。每个项的属性属于Revision对象。 代码类似于：

i = 1
While i <= ActiveDocument.Revisions.Count
    If ActiveDocument.Revisions.Item(i).Range.Text is text ...
    i = i + 1
...
Wend