Date Formula

A

AP-Topper

Is it possible to show an automatic date on a sheet which indicates when it
was last modified? and of course updates from then on...
 
R

Ron de Bruin

Hi AP-Topper

With code you can do this

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
Cancel As Boolean)
'If you save the file the date/time will be placed in cell A1 of Sheet1
Sheets("Sheet1").Range("A1").Value = Format(Now, "yyyy-mmm-dd hh:mm:ss")
End Sub

Copy the code in the Thisworkbook module and it will run automatic when you save the file
See
http://www.rondebruin.nl/code.htm
 
Top