ShowRevisions Property 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