セルの値をヘッダーやフッターに設定することは出来ないので、マクロでの対応になる。
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.RightHeader = Range("A1").Value
End Sub
アクティブシートに対する設定のみなので、複数シートを同時に選択して印刷する場合にはアクティブでないシートには適用されない。また逆に、印刷時にアクティブなシートでA1の値がヘッダー/フッターに反映されてしまうため、印刷時にこのマクロが適用されると不便な場合も想定される。
【参考】
LeftHeader 左ヘッダー
CenterHeader 中ヘッダー
RightHeader 右ヘッダー
LeftHeader 左フッター
CenterHeader 中フッター
RightFooter 右フッター
前(ヘッダー(フッター)に罫線) 目次 次(ヘッダー/フッターで任意の日付形式表示)
SEO | [PR] 爆速!無料ブログ 無料ホームページ開設 無料ライブ放送 | ||