View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default Global Header Setting

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("Las t 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
wrote:

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.