There is a Revision number property visible in the File...Properties...Statistics menu item. You can retrieve and set the value using VBA code. Here is a Workbook_Open sub for that purpose. It goes in the ThisWorkbook code pane.
Code:
Sub Workbook_Open()
ThisWorkbook.BuiltinDocumentProperties("Revision number") = ThisWorkbook.BuiltinDocumentProperties("Revision number") + 1
MsgBox ThisWorkbook.BuiltinDocumentProperties("Revision number")
End Sub
To paste the sub in the code pane for ThisWorkbook, ALT + F11 to open the VBA Editor then CTRL + R to open the Project Explorer. In the Project Explorer window, doubleclick ThisWorkbook to open its code pane. Paste the code there, then ALT + F11 to return to the spreadsheet.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.