構文
構文は以下の通りです。
With ActiveSheet.PageSetup
.CenterHeader = "ここにヘッダーのテキスト"
.LeftHeader = "ここに左側のヘッダーテキスト"
.RightHeader = "ここに右側のヘッダーテキスト"
End With
.CenterHeader = "ここにヘッダーのテキスト"
.LeftHeader = "ここに左側のヘッダーテキスト"
.RightHeader = "ここに右側のヘッダーテキスト"
End With
解説
ActiveSheet.PageSetupは、アクティブなシートのページ設定を行います。CenterHeaderは、ページの中央にヘッダーを設定します。LeftHeaderは、ページの左側にヘッダーを設定します。RightHeaderは、ページの右側にヘッダーを設定します。
プログラミング例
具体的なプログラミング例を紹介します。
Sub ヘッダーを設定する()
With ActiveSheet.PageSetup
.CenterHeader = "テストの結果"
.LeftHeader = "小学校6年生"
.RightHeader = "2024年9月"
End With
End Sub
With ActiveSheet.PageSetup
.CenterHeader = "テストの結果"
.LeftHeader = "小学校6年生"
.RightHeader = "2024年9月"
End With
End Sub
上記のプログラムでは、アクティブなシートのヘッダーを設定しています。中央には「テストの結果」というテキストが、左側には「小学校6年生」、右側には「2024年9月」が表示されるようになります。
まとめ
ヘッダーを設定するためには、ActiveSheet.PageSetupを使用します。CenterHeader、LeftHeader、RightHeaderを使って、それぞれの位置にヘッダーを設定できます。