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



"rogerl_uk" wrote:

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.

Thanks Chcuck, your help is much appreciated

"CLR" wrote:

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



"rogerl_uk" wrote:

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.

Happy to help, Roger.............and thanks for the feedback.

Vaya con Dios,
Chuck, CABGx3




"rogerl_uk" wrote:

Thanks Chcuck, your help is much appreciated

"CLR" wrote:

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



"rogerl_uk" wrote:

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.