Home » エクセルマクロ・Excel VBAの使い方 » ページ設定・PageSetup » VBAでシート名をヘッダーに

対象:Excel2007, Excel2010, Excel2013, Windows版Excel2016

VBAでシート名をヘッダーに

「シート名をヘッダー情報にするマクロ」
という検索キーワードに気づきました。

[スポンサードリンク]

アクティブシートのヘッダーにシート名を設定するサンプルマクロ

以下のSubプロシージャを実行すると、アクティブなシートの中央のヘッダーに、シートの名前が設定されます。


Sub シート名をヘッダーに_直値()
 With ActiveSheet
  .PageSetup.CenterHeader = .Name
 End With
End Sub

WorksheetオブジェクトやChartオブジェクトの、PageSetupプロパティで、PageSetupオブジェクトを取得して、

VBAでシート名をヘッダーに

PageSetupオブジェクトのCenterHeaderプロパティに、

VBAでシート名をヘッダーに

シート名を設定しています。

アクティブシートのヘッダーに自動的に変更されるシート名を設定するサンプルマクロ

上記のプロシージャでは、実行した時点のシート名が設定され、あとからシート名を変更した場合には変更が反映されません。

自動的に変更されるようにしたい場合、以下のようなSubプロシージャです。


Sub シート名をヘッダーに_自動変更()
 ActiveSheet.PageSetup.CenterHeader = "&A"
End Sub

ヘッダー・フッターには「&●」という形で指定する書式コードが決められていて「&A」で、シート名を印刷できるようになります。

[スポンサードリンク]

Home » エクセルマクロ・Excel VBAの使い方 » ページ設定・PageSetup » VBAでシート名をヘッダーに

TrackBack:1

TrackBack URL
VBAでヘッダーのフォント種別・文字サイズを設定する from インストラクターのネタ帳
ヘッダーのフォント種別や文字サイズを変更するExcel VBAのコードをご紹介しています。
[スポンサードリンク]

Home » エクセルマクロ・Excel VBAの使い方 » ページ設定・PageSetup » VBAでシート名をヘッダーに

Copyright © インストラクターのネタ帳 All Rights Reserved.

.