Can a creation date be added to a footer

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

On page setup I know how to add the currecnt date to the footer, but can the
creation date be added to the footer?

The "kludge" method is to type the date into the tab and add the tab to the
footer.

I am quite happy to do this using VBA or a macro, but can find no refernce
on how to do this.

If this is only possible in recent versions of Excel, please indicate which
version of Excel you are using.
 
This code could be in either a regular module to be triggered on demand, or
in a BeforePrint macro to trigger automatically.....

Sub Macro1()
'Adds creation date to LeftFooter
With ActiveSheet.PageSetup
.LeftFooter = "File Created " &
ActiveWorkbook.BuiltinDocumentProperties("creation date")
End With
End Sub

hth
Vaya con Dios,
Chuck, CABGx3
 
Thanks Chcuck, your help is much appreciated

CLR said:
This code could be in either a regular module to be triggered on demand, or
in a BeforePrint macro to trigger automatically.....

Sub Macro1()
'Adds creation date to LeftFooter
With ActiveSheet.PageSetup
.LeftFooter = "File Created " &
ActiveWorkbook.BuiltinDocumentProperties("creation date")
End With
End Sub

hth
Vaya con Dios,
Chuck, CABGx3
 
Happy to help, Roger.............and thanks for the feedback.

Vaya con Dios,
Chuck, CABGx3
 
Back
Top