Range.Updates (Word)

Returns a CoAuthUpdates collection object that represents all updates that were merged into the specified range at the last explicit save.

Use the Updates property to return the CoAuthUpdates collection.

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