I have this code that will enter a footer when printed. How can I enter another line?
[VBA]ActiveSheet.PageSetup.LeftFooter = "Prepared for: " & FName.Caption[/VBA]
i.e.
My Name
Example Report
I have this code that will enter a footer when printed. How can I enter another line?
[VBA]ActiveSheet.PageSetup.LeftFooter = "Prepared for: " & FName.Caption[/VBA]
i.e.
My Name
Example Report
[vba]
ActiveSheet.PageSetup.LeftFooter = "Prepared for: " & FName.Caption & Chr(10) & "something else"[/vba]
____________________________________________
Nihil simul inventum est et perfectum
Abusus non tollit usum
Last night I dreamed of a small consolation enjoyed only by the blind: Nobody knows the trouble I've not seen!
James Thurber
Thank you XLD.
One other question...
in a userform combo box, I have the words "M&IE" (without quotes). When this caption is stamped on the footer, it inputs M E ("E" is italicized) instead of M&IE. how can I make it show M&IE
[vba]
ActiveSheet.PageSetup.LeftFooter = "Prepared for: " & Replace(FName.Caption, "&", "&&") & Chr(10) & "something else" [/vba]
____________________________________________
Nihil simul inventum est et perfectum
Abusus non tollit usum
Last night I dreamed of a small consolation enjoyed only by the blind: Nobody knows the trouble I've not seen!
James Thurber
Thank you xld