save date formula

Posted by Patience on April 11, 2001 1:35 PM

Hi. I need to have a formula in my worksheet that will display the last date on which the worksheet was saved. I'd like it to automatically update, so that when the worksheet is saved again, the date shows the newest save event.

Posted by Stephane Parent on April 11, 2001 1:51 PM

Hi Patience,

try adding this code to "thisworkbook"

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Worksheets("sheet1").Range("a1").Value = Now
End Sub

I hope it works!

Stephane Parent