Excelで印刷時のヘッダー・フッターの
フォントを設定するマクロを紹介致します。
○ヘッダー中央部にMS明朝を指定する
ActiveSheet.PageSetup.CenterHeader = "&""MS 明朝""ヘッダーです"
"MS 明朝" の部分に指定したいフォント、
"ヘッダーです" の部分にヘッダーに表示する文字列を指定してください。
○右側フッターにMS UI Gothicを9ptで指定する
ActiveSheet.PageSetup.RightFooter = "&""MS UI Gothic""&9フッターです"
表示する文字列の前に「&n」を記述する事で「n」ptのフォントサイズで指定が出来ます。
○左側フッターにMSゴシックを太字で指定セルの値を表示する
ActiveSheet.PageSetup.LeftFooter = "&""MS ゴシック""&B" & Worksheets("Sheet3").Range("B2").Value
Sheet3のB2セルに入っている値を太字で左側フッターに設定出来ます。
斜体で表示したい場合には"&B"を"&I"、
太字斜体で表示したい場合には"&B&I"と指定しましょう。
左側、中央、右側ヘッダーはそれぞれLeftHeader、CenterHeader、RightHeader
左側、中央、右側フッターはそれぞれLeftFooter、CenterFooter、RightFooter
を指定する事で設定が可能です。