Last Modified Date

[CAA]

How can the last modified date be automatically updated in
a cell on an Excel 97 spreadsheet?

Thanks,
CAA

 

[Vasant Nanavati]

It can't. You have to use a macro to record the date every time a save takes
place.

 

[CAA]

Oh. How is that done, then?

I don't know how to get the Last Modified Date to appear
without keying it in myself. I want to update it with a
macro or in conjunction with the save on exit (??) command.

Thank you,
CAA

 

[Bob Phillips]

Put this in a standard code module

Function LMD()
LMD = ActiveWorkbook.BuiltinDocumentProperties("Last Save Time")
End Function

Call with =LMD()

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

 

[Ron de Bruin]

Hi all
Tom mention that this will not work correct in Excel 97.

Use this for Excel 97 in the Thisworkbook module

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
Cancel As Boolean)
'If you save the file the date will be placed in cell A1 of Sheet1
Sheets("Sheet1").Range("a1").Value = Date
End Sub