Excel Header Formatting

yussi1870 · Mar 22nd, 2002, 09:23 AM

In my VB Code I need to copy the header from one worksheet to another and then reformat the font size and font name but I can't seem to strip the old formatting out. Any ideas?

Al Chara · Mar 22nd, 2002, 10:02 AM

Try the following code:

With Worksheets("New Worksheet").PageSetup
.CenterHeader = "&""Times New Roman,Regular""&8The Old Header"
End With

This code sets the center header for a worksheet called "New Worksheet" to the text "The Old Header" in regular 8 point Times New Roman font.

Mar 22nd, 2002, 10:02 AM	#2
Al Chara MrExcel MVP Join Date: Feb 2002 Location: Monterrey, Mexico Posts: 1,433	Try the following code: With Worksheets("New Worksheet").PageSetup .CenterHeader = "&""Times New Roman,Regular""&8The Old Header" End With This code sets the center header for a worksheet called "New Worksheet" to the text "The Old Header" in regular 8 point Times New Roman font. __________________ Kind regards, Al Chara

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Mar 22nd, 2002, 09:23 AM	#1
yussi1870 Board Regular Join Date: Mar 2002 Posts: 128	In my VB Code I need to copy the header from one worksheet to another and then reformat the font size and font name but I can't seem to strip the old formatting out. Any ideas?