Adding a line in footer

G

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,
 
B

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)
 

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

Top