Thank you but can you give me a more detailed explenation?On 2002-10-02 06:50, JetPhoenix wrote:
Most def.
try this format...
ls_date = Format(ls_date, "dd mmmm yyyy")
works fine for me in my add-in.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftHeader = Format(Now, "MMM")
End With
End Sub
On 2002-10-02 08:09, Andrew Poulsom wrote:
I don't know a way to do it without VBA.
Code:Private Sub Workbook_BeforePrint(Cancel As Boolean) With ActiveSheet.PageSetup .LeftHeader = Format(Now, "MMM") End With End Sub
Right click the Excel icon to the left of File on the menu and choose View Code. Paste in the above.