Global Header Setting

[Bern Notice]

Is there a way to have a global setting in Excel that automatically prints a
header on spreadsheets that shows the Date Modified and Modified by a user
name? That way when you print a report, you can tell who changed it and when
they last made a change.

 

[Gord Dibben]

No global setting for this.

You need a macro to add the footer.

Sub Last_Saved_Footer()
'Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim wkSht As Worksheet
For Each wkSht In ThisWorkbook.Worksheets
wkSht.PageSetup.RightFooter = "Last Saved By: " & _
Environ("UserName") & " " & _
Format(ThisWorkbook.BuiltinDocumentProperties("Last Save Time"), _
"yyyy-mmm-dd hh:mm:ss")
Next wkSht
End Sub


Gord Dibben MS Excel MVP

On Sat, 3 Jan 2009 10:00:01 -0800, Bern Notice <Bern