如何在頁首或頁尾設定指定的日期或日期時間格式？

作者Xiaoyang修改日期2025-07-24

使用 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

附註：

此程式碼會自動將您指定格式的當前日期插入頁首。只需將 CenterHeader 替換為 LeftHeader、RightHeader、LeftFooter、CenterFooter 或 RightFooter，即可輕鬆將格式化日期移至頁首或頁尾的其他位置！
日期格式字串（例如）mmmm dd, yyyy，可產生「April 23, 2024」）也可依需求自訂為任何標準 VBA 日期格式碼，例如 dd/mm/yyyy、yyyy-mm-dd 或其他格式。
請留意日期格式字串的語法——使用錯誤的格式代碼可能導致錯誤或非預期結果。務必在「頁面版面配置檢視」中確認顯示效果是否符合您的預期。

4. 輸入並檢查程式碼後，按下 F5 或點選 VBA 編輯器中的「執行」按鈕以執行程式碼。設定完成後，格式將立即反映在工作表的頁首或頁尾中。您可在頁面版面配置檢視中確認結果，如下圖所示：

執行程式碼以在頁首或頁尾取得指定的日期格式

若您希望每次開啟或列印活頁簿時自動更新日期，必須重新執行 VBA 程式碼，或將其指派至 Workbook 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 AI 解鎖 Excel 的神奇功能

智慧執行：透過簡易指令，輕鬆執行儲存格操作、分析資料，並建立圖表！
自訂公式：打造專屬公式，讓您的工作流程更順暢！
VBA 編碼：輕鬆撰寫並套用 VBA 程式碼，立即提升工作效率！
公式解析：輕鬆掌握複雜公式！
文字翻譯：輕鬆打破試算表中的語言隔閡！

運用 AI 驅動的工具強化您的 Excel 能力。立即下載體驗前所未有的高效！

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多