KutoolsforOffice— 1 つのソリューション、5 つの強力なツール。少ない労力で大きな成果。

ヘッダーまたはフッターで日付または日時形式を指定するには?

著者Xiaoyang変更日

Excel を使用する際、印刷用レポートの作成やドキュメントの改訂履歴管理などの目的で、ワークシートのヘッダーまたはフッターに現在の日付や時刻を含める必要がよくあります。既定では、ヘッダーまたはフッターに日付や時刻を挿入する際に&[Date]または&[Time]コードを使用すると、Excel はWindows の地域設定に基づいて日付・時刻を表示します。このため、組み込み機能だけでは、「4/23/2024」ではなく「April 23, 2024」のようにヘッダーやフッター内の日付や時刻の表示形式を直接カスタマイズすることはできません。

この制限は、ドキュメントの日付・時刻表記を特定の企業スタイルガイドや地域的・個人的な嗜好に合わせたい場合に課題となることがあります。たとえば、「月日、 年」形式で日付を表示したり、ヘッダーまたはフッターに「April 23, 2024 18:05」のように日付と時刻を組み合わせて表示したい場合などです。次のスクリーンショットは、ワークシートのヘッダーにカスタマイズされた日付形式を示しています。

ヘッダーで日付を書式設定

この問題を解決するには、VBA(Visual Basic for Applications)を使用して、プログラムでヘッダーまたはフッターに希望の日付や日時形式を設定する必要があります。これにより、Excel の組み込みヘッダー・フッターツールの制限を回避し、より柔軟なカスタマイズが可能になります。

VBA コードでヘッダーまたはフッターに日付または日付と時刻の形式を設定するを指定する


青色の右向き矢印の吹き出し VBA コードでヘッダーまたはフッターに日付または日付と時刻の形式を設定するを指定する

ヘッダーまたはフッターに表示する日付、または日付と時刻の形式をカスタマイズするには、シンプルな VBA コードを使用できます。この方法は、システムの地域設定にとらわれず、柔軟でパーソナライズされた表示形式を実現したい場合に最適です。以下の手順に従ってください。

1.日付をヘッダーまたはフッターに挿入・カスタマイズしたいワークシートを開きます。印刷時のヘッダーやフッターの表示を簡単にプレビューできるよう、ページレイアウト表示に切り替えておくと便利です。ページレイアウト表示を有効にするには、下図のようにExcel ウィンドウの右下隅にあるページレイアウトボタンをクリックします。

ページレイアウト ビューを有効にするには、[ページレイアウト] ボタンをクリックします

ヒント:VBA コードの実行にページレイアウト表示への切り替えは必須ではありませんが、ヘッダー/フッターの変更を即座に視覚的に確認したい場合は、ぜひページレイアウト表示をご利用ください。

2.キーボードでALT + F11を押すと、Microsoft Visual Basic for Applications(VBA)エディターウィンドウが開きます。

3.VBA エディターで、挿入モジュールをクリックすると、新しいモジュールが作成されます。次の VBA コードをモジュールウィンドウにコピー&ペーストしてください。

VBA コード:ヘッダーまたはフッターに日付を挿入・書式設定する:

Sub add_date_header()
ActiveSheet.PageSetup.CenterHeader = Format(Date, "mmmm dd, yyyy")
End Sub
注記
  • このコードは、選択した形式で現在の日付を自動的にヘッダーに挿入します。書式付き日付をヘッダーまたはフッターの別の場所に移動したい場合は、CenterHeaderLeftHeaderRightHeaderLeftFooterCenterFooter、またはRightFooterに変更してください。
  • 日付形式文字列(例:mmmm dd, yyyy(「April 23, 2024」のように表示されます))も、dd/mm/yyyyyyyy-mm-ddなど、標準的な VBA の日付形式コードに応じて自由にカスタマイズできます。
  • 日付形式の文字列構文には十分ご注意ください。不適切な書式コードを使用すると、エラーが発生したり、意図しない結果となる可能性があります。必ずページレイアウト表示で、出力が期待通りになっているかご確認ください。

4.コードを入力・確認後、F5キーを押すか、VBA エディターの「実行」ボタンをクリックしてコードを実行すると、指定した日付形式がワークシートのヘッダーまたはフッターに即座に反映されます。次のスクリーンショットのように、ページレイアウト表示で結果をすぐにご確認いただけます。

コードを実行してヘッダーまたはフッターに指定した日付形式を取得

ブックを開いたり印刷したりするたびに日付を動的に更新したい場合は、VBA コードを再実行するか、そのコードをワークブックの Open イベントまたは BeforePrint イベントに割り当てる必要があります。この VBA ベースの方法は手動処理となるため、コードを再実行しない限り、ヘッダー/フッターの日付は翌日以降も自動では更新されません。

ヒント:カスタム形式で日付に現在時刻を含めるには、次の VBA コードをご活用ください。レポートにタイムスタンプが必要な場合や、ワークシートのヘッダー/フッターに印刷・エクスポートの日時を記録したいときに最適です!

Sub Change_Format()
  ActiveSheet.PageSetup.CenterHeader = Format(Now, "MMMM DD, YYYY HH:MM:SS")
End Sub

このようにして、指定した形式で日付と時刻の両方が表示されるヘッダーまたはフッターが完成します。たとえば、形式を"mmmm dd, yyyy hh:mm"に設定すると、「April 23, 2024 18:05」のように表示されます。

すると、次のような結果が得られます。

コードを実行してヘッダーまたはフッターに指定した日時形式を取得

注意:VBA マクロを含むブックを保存する際は、コードが今後も使えるように、必ずマクロ有効ブック(.xlsm)形式で保存してください。Excel の設定によってはマクロの実行が制限されている場合があります。エラーが発生した場合は、ファイル>オプション>トラストセンター>トラストセンターの設定>マクロの設定からマクロのセキュリティ設定をご確認ください。ヘッダーまたはフッターが期待通りに更新されない場合は、正しいワークシートでマクロを実行していること、およびコードが適切なヘッダー/フッター部分を参照していることをご確認ください。

異なるシートにそれぞれ別の日付形式を設定する必要がある場合は、該当する各ワークシートでこの手順を繰り返し、必要に応じて書式文字列を調整してください。頻繁に使う際は、VBA コードをボタンやショートカットキーに割り当てて、素早くアクセスできるようにすることも可能です。

ヘッダーまたはフッターの日付形式をカスタマイズする代替アプローチには次のようなものがあります。
ヘッダーまたはフッターに手動で日付/時刻を入力する(簡単だが静的):ページレイアウト表示でヘッダーまたはフッターをダブルクリックし、希望の形式で任意の日付や時刻を直接入力できます。ただし、この方法ではワークシートを開いたり印刷したりするたびに自動更新されません。静的なドキュメントには手軽な解決策ですが、新しい日付に更新するには手動での修正が必要です。

要するに、ヘッダーまたはフッターに柔軟でカスタマイズ可能かつ動的な日付や日時形式を実現したいなら、VBA を使うのが最適な解決策です。書式文字列を今一度確認し、マクロを確実に保存することをお忘れなく。コード実行後に日付形式が更新されなかったり、古いままだったりする場合は、マクロのセキュリティ設定を再確認するか、ブックを保存して再度開いてみてください。

kutools for excel AI のスクリーンショット

KUTOOLS AI でExcel の魔法を解き放ちましょう

  • スマート実行:セル操作、データ分析、チャート作成をすべてシンプルなコマンドで実現します。
  • カスタム数式:ワークフローの効率化に役立つ、あなただけのカスタマイズ数式を生成します。
  • VBA コーディング:VBA コードを簡単に記述・実装できます。
  • 数式の解釈:複雑な数式が簡単に理解できます。
  • テキスト翻訳:スプレッドシート内で言語の壁を乗り越えましょう!
AI 搭載のツールでExcel の機能をさらに強化しましょう。今すぐダウンロードして、これまでにない効率を体験してください!

最高の Office 業務効率化ツール

🤖KUTOOLS AI アシスタント:次に基づいてデータ分析を革新します:インテリジェント実行     コード生成  カスタム数式作成    データ分析とチャート生成  拡張機能呼び出し
人気の機能検索・ハイライト、または重複をマーキング     空白行を削除する     データを失うことなく列の結合またはセルを     数式を使用しない四捨五入...
スーパー LOOKUP複数条件 VLookup    複数値 VLookup     複数シート間 VLookup      ファジーマッチ....
高度なドロップダウンリストドロップダウンリストをすばやく作成     連動型ドロップダウンリスト     複数選択可能なドロップダウンリスト....
列マネージャー指定した数の列を追加列の移動非表示列の表示状態を切り替え範囲および列の比較...
注目の機能グリッドフォーカス     デザインビュー   強化された数式バー    ワークブックとシートマネージャー     リソースライブラリ(オートテキスト)  日付ピッカー     ワークシートの統合    暗号化/セルの復号化    リストからメール送信     スーパーフィルター      特殊フィルタ(太字のフォントを持つセルをフィルタリング/斜体/取り消し線。。。) 。。。
トップ15 ツールセット12 テキストツールテキストの追加特定の文字を削除、...)   50+チャートタイプガントチャート、...)   40+実用的関数誕生日に基づいて年齢を計算します、...)   19 挿入ツールQR コードを挿入パスから画像を挿入、...)   12 変換ツール単語に変換する為替レートの変換、...)   7 結合と分割ツール高度な行のマージセルの分割、...)さらに多数
Kutools はお好みの言語でご利用いただけます。英語、スペイン語、ドイツ語、フランス語、中国語、および40+の他の言語をサポートしています!

Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。


Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします

  • Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
  • 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
  • 日々の生産性を50%も向上させ、毎日数百回ものマウスクリックを削減します!

すべてのKutools アドインが、たった1 つのインストーラーで完結。

Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。

ExcelWordOutlookTabsPowerPoint
  • オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン+Office Tab Pro
  • インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能(MSI 対応)
  • 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
  • 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
  • 最高のお得感— 個別アドイン購入よりお得