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

通常，當您使用 &[Date] 或 &[Time] 程式碼將日期或時間插入頁首或頁尾時，日期或時間格式是基於 Windows 控制的區域設定。在這種情況下，如何根據自己的需求更改頁首或頁尾中的日期或日期時間格式，如下方螢幕截圖所示？

使用 VBA 程式碼在頁首或頁尾中指定日期或日期時間格式

使用 VBA 程式碼在頁首或頁尾中指定日期或日期時間格式

在此，我將介紹一些簡單的 VBA 程式碼，幫助您在 Excel 中解決此任務，請按照以下步驟操作：

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

備註：在上述程式碼中，您可以將居中頁首更改為 左對齊頁首、居中頁尾等，並且日期格式 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 代碼。
• 公式解釋：輕鬆理解複雜的公式。
• 文本翻譯：打破電子表格中的語言障礙。

通過人工智能工具增強您的 Excel 能力。立即下載，體驗前所未有的效率！