Auto insert "CreateDate" to Footer

  • Thread starter Thread starter David
  • Start date Start date
D

David

How can I setup up insertion of the Creation Date, not now etc, into a
sheet.xlt footer, this is mainly to identify old sheets that have Nows etc
in them, simply to know when the sheet was created.
Many thanks,
Dave
 
Insert the following macro in ThisWork code area:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
v = ActiveWorkbook.BuiltinDocumentProperties(11).Value
ActiveSheet.PageSetup.CenterFooter = v
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

CREATEDATE not displaying 1
default footer for charts 1
Inserting the same header/footer on all worksheets in a workbook 7
How do I auto-enter the creation date in footer of an Excel worksh 5
Excel-Adding rows to master sheet that will be inserted on following worksheets 1
Static Date & Time in Footer - Excel 2007 1
Can a creation date be added to a footer 3
Printing modified CreateDate field in header reverts back - Word 2 5

Back
Top