Selection.PreviousRevision (Word)

Localise et renvoie la modification précédente sous la forme d' un objet Revision.

PreviousRevision (Wrap)

Wrap: True : la recherche d'une révision se poursuit vers la fin du document lorsqu'elle atteint le début du document.

Selection.EndOf Unit:=wdStory, Extend:=wdMove 
Set myRev = Selection.PreviousRevision 
If Not (myRev Is Nothing) Then MsgBox myRev.Date