ヘッダーまたはフッターで日付または日時の形式を指定するにはどうすればよいですか？

通常、&[Date] または &[Time] コードを使用してヘッダーやフッターに日付や時刻を挿入すると、その形式はWindowsによって制御される地域設定に基づいています。この場合、次のスクリーンショットに示すように、ヘッダーやフッターで日付または日時の形式を独自のニーズに合わせて変更するにはどうすればよいでしょうか？

VBAコードを使用してヘッダーやフッターで日付または日時の形式を指定する

VBAコードを使用してヘッダーやフッターで日付または日時の形式を指定する

ここでは、Excelでこのタスクを解決するために役立つ簡単なVBAコードをいくつか紹介します。以下の手順に従ってください：

1. 日付を挿入してヘッダーやフッターで書式設定したいワークシートをアクティブにし、ワークブックの右下にある「 ページレイアウト」ボタンをクリックして、ページレイアウトビューを有効にします。スクリーンショットをご覧ください：

2. Excelで ALT + F11 キーを押したままにすると、Microsoft Visual Basic for Applications ウィンドウが開きます。

3. 「挿入」＞「 モジュール」をクリックし、次のコードをモジュールウィンドウに貼り付けます。

VBAコード： ヘッダーやフッターに日付を挿入して書式設定する：

Sub add_date_header()
ActiveSheet.PageSetup.CenterHeader = Format(Date, "mmmm dd, yyyy")
End Sub

注： 上記のコードでは、中央揃えヘッダー（CenterHeader）を 左揃えヘッダー（LeftHeader）、中央揃えフッター（CenterFooter）などに変更でき、また、日付形式 mmmm dd, yyyy も必要に応じて変更できます。

4. そして、F5キーを押してこのコードを実行すると、指定された日付形式がすぐにヘッダーやフッターに挿入されます。スクリーンショットをご覧ください：

ヒント： ヘッダーやフッターに独自の日時形式を挿入したい場合は、次のコードを使用してください：

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

次の結果が得られます：

Kutools AIでExcelの魔法を解き放つ

• スマート実行: セル操作、データ分析、グラフ作成を簡単なコマンドで行います。
• カスタム数式: ワークフローを合理化するための独自の数式を生成します。
• VBAコーディング: 簡単にVBAコードを作成し実装します。
• 数式の解釈: 複雑な数式を簡単に理解できます。
• テキスト翻訳: スプレッドシート内の言語障壁を取り除きます。

AI搭載ツールでExcelの機能を強化しましょう。今すぐダウンロードして、かつてないほどの効率を体験してください！