Footer: long date format?


Posted by Chris on February 19, 2001 7:57 PM

Is there any way to set the date format in the footer to the long date format of e.g. 20-Feb-01

Chris

Posted by Dave Hawley on February 19, 2001 8:42 PM


Chris, i don't have any way to check, but I believe by changing the date format under Start>Settings>Control Panel-Date and Time will do it.

Dave

OzGrid Business Applications

Posted by Chris on February 19, 2001 9:31 PM

Dave, thanks for the reply but I've already tried that. It doesn't work. Excel defaults to the short date format.

Chris

Posted by Dax on February 20, 2001 2:08 PM


Chris,
Putting this in your workbook code will achieve the desired results:-
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftFooter = Format(Date, "dd-mmm-yy")
End Sub


Dax.



Posted by Chris on February 21, 2001 2:49 AM

Dax,
Now that I've figured out what you mean and how to do it - it works a treat! Thx