Format Header Date
Worked great.........thanks!
"Gary''s Student" wrote:
Put the following macro in the workbook code area:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = Format(Date, "mmmm yyyy")
End Sub
--
Gary''s Student - gsnu200755
"TomCat" wrote:
I have a monthly spreadsheet in which I have to change the date in the header
each month. I want to do this automatically so I use the &[Date] feature but
it gives me a format like: 11-11-07.
I would like it to show November 2007.
How can I do this?
Thanks.............TomCat
|