RejectAll Method Example
This example rejects all the tracked changes in the active document.
ActiveDocument.Revisions.RejectAll
This example rejects all the tracked changes in the selection.
Set myRange = Selection.Range myRange.Revisions.RejectAll