Document.TrackRevisions (Word)

True, wenn Änderungen im angegebenen Dokument nachverfolgt werden.

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