教えて!ExcelVBA!

ExcelVBAの基礎知識・書き方について紹介します。

ExcelVBAでヘッダーを設定する方法

構文

構文は以下の通りです。

With ActiveSheet.PageSetup
    .CenterHeader = "ここにヘッダーのテキスト"
    .LeftHeader = "ここに左側のヘッダーテキスト"
    .RightHeader = "ここに右側のヘッダーテキスト"
End With

解説

ActiveSheet.PageSetupは、アクティブなシートのページ設定を行います。CenterHeaderは、ページの中央にヘッダーを設定します。LeftHeaderは、ページの左側にヘッダーを設定します。RightHeaderは、ページの右側にヘッダーを設定します。

プログラミング例

具体的なプログラミング例を紹介します。

Sub ヘッダーを設定する()
    With ActiveSheet.PageSetup
        .CenterHeader = "テストの結果"
        .LeftHeader = "小学校6年生"
        .RightHeader = "2024年9月"
    End With
End Sub

上記のプログラムでは、アクティブなシートのヘッダーを設定しています。中央には「テストの結果」というテキストが、左側には「小学校6年生」、右側には「2024年9月」が表示されるようになります。

まとめ

ヘッダーを設定するためには、ActiveSheet.PageSetupを使用します。CenterHeader、LeftHeader、RightHeaderを使って、それぞれの位置にヘッダーを設定できます。