How to enter last saved date in Excel workbook

I am using Office Pro Plus 2010 and I wanted to have the last saved date displayed in my document for my records.  I found this simple method:

To modify a workbook you have to save it so we can use the before_save event
ALT+F11 to open vb editor. Double click ‘ThisWorkbook’ and paste this code in on the right. Change the sheet and range to suit
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets(“Sheet1”).Range(“A1”).Value = Now
End Sub

Similar Posts