Modified Date in Spreadsheet

  • Thread starter Thread starter Mike
  • Start date Start date
M

Mike

I would like to display the last date that a file was
modified in the footer on a spreadsheet.
Thanks
 
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
 
Back
Top