Adding a line in footer

[Guest]

Is there any way I can customize my footer.

I have some text in left, center and right section of footer but the text is
too big. Is there any way I can insert a blank line vbNewLine in the footer.

Help would be appreciated and thanks in advance.

Regards,

 

[Bob Phillips]

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = "some text" & vbNewLine & "some more"
End Sub

'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code


--

HTH

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