拒绝某一区域中的所有修订。将删除修订标记,不改变原文。
expression.RejectAll
expression 必需。返回 Revision 对象的表达式。
可用 RejectAllRevisions 方法来拒绝文档中的所有修订。对于格式的修改不能加以拒绝。
本示例拒绝活动文档中的所有修订。
ActiveDocument.Revisions.RejectAll
本示例拒绝所选内容中的所有修订。
Dim rngTemp As Range
Set rngTemp = Selection.Range
rngTemp.Revisions.RejectAll