Macro to capture Cell Values in Header plus format

[reyrey]

Need some help from the Excel Gods .... trying to figure out how to capture a cell value to a header along with changing its format. I figured how to capture the value but I'm stump on how to change the formating. Below is so far what I've got. Need to change the heading to BOLD, Ariel, and font 18 size.

Any help would be greatly appreciated! <?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>




Windows("Report Template.xls").Activate
Sheets("sheet1").Select
ActiveSheet.PageSetup.CenterHeader = _
Format(Worksheets("sheet2").Range("Q2").Value)

 

[VoG]

Try

ActiveSheet.PageSetup.CenterHeader = "&""Ariel,Bold""&18" & Format(Worksheets("sheet2").Range("Q2").Value)

 

[reyrey]

Yippie, it works!!!!

Thanks VoG