Range.Updates (Word)

Renvoie un objet de collection CoAuthUpdates qui représente toutes les mises à jour qui ont été fusionnés dans la plage spécifiée au niveau du dernier enregistrement explicite.

Pour renvoyer la collection CoAuthUpdates, utilisez la propriété Updates.

Dim countOfUpdates As Integer 
 
countOfUpdates = ActiveDocument.Paragraphs(1).Range.Updates.Count 
 
MsgBox "The number of updates is " & countOfUpdates