TrackRevisions Property

True if changes are tracked in the specified document. Read/write Boolean.

Example

This example sets the active document so that it tracks changes and makes them visible on the screen.

  With ActiveDocument
    .TrackRevisions = True
    .ShowRevisions = True
End With

This example inserts text if change tracking isn't enabled.

  If ActiveDocument.TrackRevisions = False Then
    Selection.InsertBefore "new text"
End If