Excel/VBAでヘッダー・フッターを編集する

Excel/VBA印刷時のヘッダー・フッターを編集する方法です。

'ヘッダーの右側の部分を設定（ページ数/総ページ数）
Worksheets("Sheet1").PageSetup.RightHeader = "&P/&N"
'ヘッダーの中央の部分を設定（ファイル名）
Worksheets("Sheet1").PageSetup.CenterHeader = "&F"
'ヘッダーの左側の部分を設定（日付 時刻）
Worksheets("Sheet1").PageSetup.LeftHeader = "&D &T"

'フッターの右側の部分を設定（ページ数/総ページ数）
Worksheets("Sheet1").PageSetup.RightFooter = "&P/&N"
'フッターの右側の部分を設定（ファイル名）
Worksheets("Sheet1").PageSetup.CenterFooter = "&F"
'フッターの右側の部分を設定（日付 時刻）
Worksheets("Sheet1").PageSetup.LeftFooter = "&D &T"
 

 

ヘッダー・フッターの設定で利用可能なコードは以下の通り。

コード	説明
&D	現在の日付
&T	現在の時刻
&F	ファイル名
&Z	ファイルパス
&A	シート名
&P	ページ番号
&N	総ページ数

 

 - Excel, VBA