Modified Date in Spreadsheet

[Mike]

I would like to display the last date that a file was
modified in the footer on a spreadsheet.
Thanks

 

[Frank Kabel]

Hi
put the following code in your workbook module (not in a standard
module):

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim wkSht As Worksheet
For Each wkSht In Me.Worksheets
With wkSht.PageSetup
.CenterFooter = Me.BuiltinDocumentProperties("Last save time")
End With
Next wkSht
End Sub