Selection.PreviousRevision (Word)
Busca y devuelve la marca de revisión anterior como un objeto revision .
PreviousRevision (Wrap)
Wrap: True para proseguir buscando una revisión al final del documento cuando se llega al principio del mismo.
Selection.EndOf Unit:=wdStory, Extend:=wdMove
Set myRev = Selection.PreviousRevision
If Not (myRev Is Nothing) Then MsgBox myRev.Date