Change the format of my footer {date} option?

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

Guest

I would like to show the date in my footer as January 25, 2005 instead of the
default 01/25/05
 
Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet
.PageSetup.LeftFooter = Format(Date, "mmmm dd, yyyy")
End With
End Sub


put this in the ThisWorkbook code module.

--

HTH

RP
(remove nothere from the email address if mailing direct)
 

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

Back
Top