Accept Method

Applies To

Revision object.

Description

Accepts the specified tracked change. The revision marks are removed, and the change is incorporated into the document.

Syntax

expression.Accept

expression Required. An expression that returns a Revision object.

See Also

AcceptAll method, Reject method.

Example

This example accepts the next tracked change found if the change type is inserted text.

Set myRev = Selection.NextRevision(Wrap:=True)
If Not (myRev Is Nothing) Then
    If myRev.Type = wdRevisionInsert Then myRev.Accept
End If

This example accepts all the tracked changes in the selection.

Set myRange = Selection.Range
For Each myRev In myRange.Revisions
    myRev.Accept
Next myRev