Workbook.RevisionNumber (Excel)
Retorna o número de vezes que a pasta de trabalho foi salva enquanto aberta como uma lista compartilhada. Se a pasta de trabalho estiver aberta em modo exclusivo, essa propriedade retornará 0 zero. Long somente leitura.
A propriedade RevisionNumber só é atualizada quando a cópia local da pasta de trabalho é salva, e não quando as cópias remotas são salvas.
Dim lngRevisionNumber As Long
lngRevisionNumber = ActiveWorkbook.RevisionNumber