Returns the number of times the workbook has been saved while open as a shared list. If the workbook is open in exclusive mode, this property returns 0 (zero). Read-only Long.
Remarks
The RevisionNumber property is updated only when the local copy of the workbook is saved, not when remote copies are saved.
Example
This example uses the revision number to determine whether the active workbook is open in exclusive mode. If it is, the example saves the workbook as a shared list.
If ActiveWorkbook.RevisionNumber = 0 Then
ActiveWorkbook.SaveAs _
filename:=ActiveWorkbook.FullName, _
accessMode:=xlShared, _
conflictResolution:= _
xlOtherSessionChanges
End If