AcceptAllRevisions Method
Accepts all tracked changes in the specified document.
expression.AcceptAllRevisions
expression Required. An expression that returns a Document object.
Example
This example checks the main story in the active document for tracked changes, and if there are any, the example incorporates all revisions in all stories in the document.
If ActiveDocument.Revisions.Count >= 1 Then _
ActiveDocument.AcceptAllRevisions