Putting Printdate in header/Footer

  • Thread starter Thread starter Dmanley80
  • Start date Start date
D

Dmanley80

Does anybody know is it possible to put printdate in the
header or footer of an excel sheet?
Thank you.
 
Dmanley80 said:
Does anybody know is it possible to put printdate in the
header or footer of an excel sheet?
Thank you.
Click to expand...

Hi
You have to use the workbook event Before_print to insert
cell values into the header/footer. e.g.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim wkSht As Worksheet
For Each wkSht In ActiveWindow.SelectedSheets
With wkSht.PageSetup
.CenterHeader = Format(Now, "mm-dd-yyyy")
End With
Next wkSht
End Sub

This will insert the current date in your header

Frank
 
This feature is already provided in the Page Setup; Drill down to the
Header/Footer screen click in the Left Footer Box then click on an Icon with
a small calendar "8.7"
then OK out; Time is also available see the clock?
 

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

Searching for PRINTDATE field 1
Supress blank Printdate 1
HEADER & FOOTER 1
Header/Footer on entire workbook 4
Excel Unique last page footer 1
Header and Footer 1
How do I to refer to a (named) cell in Excel header/footer? 1
PUT PAGE NUMBER INTO A SPECIFIC CEL? 1

Back
Top