Document.TrackRevisions (Word)

True si les modifications sont suivies dans le document spécifié.

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