Document.TrackRevisions (Word)

True si se realiza un seguimiento de los cambios en el documento especificado.

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