如何在Excel的單元格中插入當前日、月或年？

Excel提供了內置函數和便捷的快捷鍵，讓您可以快速插入當前日期、月份或年份。當您希望Excel顯示自動更新的當前日期信息，或需要在特定時刻手動輸入時間戳時，這些方法非常理想。

例如，要以數字形式顯示當前月份，只需在目標單元格中輸入以下公式： =MONTH(TODAY()) 然後按 Enter。這將返回當前月份（例如，8代表八月）。

參數說明：

• 公式 =TODAY() 和 =NOW() 在工作表重新計算時會自動更新，因此顯示的日期/時間始終保持最新。
• =YEAR(TODAY()) 返回四位數的年份，而 =TEXT(TODAY(),"MMMM") 提供月份的全名。
• 如果您想要一個靜態值（以後不會改變），請使用以下快捷鍵。

對於靜態輸入——例如，當您想記錄特定事件的日期並且不希望該值在未來更新時——快捷鍵特別有用：

(1) 要立即在選定單元格中插入當前日期，請按 CTRL + ;。

(2) 要在同一單元格中插入當前日期和時間，首先按 CTRL + ; 插入日期，釋放按鍵，然後按空格鍵添加空格，最後按 CTRL + SHIFT + ; 添加當前時間。

實用提示與提醒：

• 使用 =TODAY() 或 =NOW() 的公式在文件重新計算時會持續更新，而鍵盤輸入值一旦輸入則固定不變。
• 請注意您的工作表計算模式。如果值沒有自動更新，您可能需要按 F9 來刷新。
• 如果您將公式複製到多行，請根據需要調整單元格引用。

這兩種方法廣泛適用於數據錄入表、每日日誌、自動化報告以及任何需要最新日期值的地方。純公式方法最適合數據必須始終反映最新日期的情況；鍵盤方法則為靜態記錄提供控制。

如果您已安裝 Kutools for Excel，Insert Date 工具讓插入當前年、月或日變得簡單，只需幾次點擊即可選擇您偏好的日期格式。此方法特別適用於需要一致的自定義格式或快速訪問日曆選擇器以進行靈活選擇的情況。

安裝 Kutools for Excel 後，請參閱以下步驟：

1. 選擇要插入當前年、月或日的單元格。然後前往 Kutools > 插入 > 插入日期。

2. 在“插入日期”對話框中，確保已選中 使用格式 選項。然後雙擊右側列表中的所需日期格式。所選格式將立即應用於活動單元格。請參見下面的截圖：

現在，當前日期會以您指定的格式出現在所選單元格中。

注意事項與使用建議：

• 默認情況下，“插入日期”對話框的日曆中已高亮顯示今天的日期。要插入其他日期，只需在日曆上點擊所需的日期，然後雙擊您偏好的格式即可。
• 此方法讓您可以靈活處理本地化的日期格式、專業報告模板以及任何需要一致視覺呈現的場景。

對於需要在內容區、頁眉或頁腳中蓋印實時信息的工作表場景，Kutools for Excel 提供了 Insert Workbook Information 工具。此功能特別適用于自動化文檔控制、審核目的或在分發報告上進行一致的時間戳記，因為它只需幾個步驟就能插入準確的日期和時間數據。

1. 點擊工具欄中的 Kutools Plus > 工作簿 > 插入工作簿資訊。

2. 在“插入工作簿資訊”對話框中，選擇 當前日期和時間 選項。在 插入位置 部分，指定您希望插入信息的位置——選項包括任何工作表單元格，以及頁眉或頁腳的任何區域。點擊 確定 完成插入。請參考上圖以獲得視覺指引。

當前日期和時間現已插入到您需要的位置。

額外提示：

• 此方法在需要添加修訂日期、數據導出的時間戳或打印物理記錄時特別有幫助。
• 請記住，在頁眉或頁腳中插入的數據在頁面佈局或打印預覽視圖中最容易看到。
• 除非重新應用“插入工作簿資訊”工具，否則在此處所做的更改不會自動更新。

為了實現更高程度的自動化——例如，當您希望每次修改特定單元格時Excel能記錄確切的日期，或者您希望通過點擊按鈕來觸發日期戳記——可以使用 VBA (Visual Basic for Applications)。這種方法特別適用於日誌表、審計跟踪或需要精確控制的自定義報告。VBA 可根據您的特定工作流程需求動態插入當前日期、月份或年份。

場景1：每次編輯指定列或範圍中的單元格時自動插入當前日期。此解決方案非常適合創建“上次修改”列或自動時間戳記條目。

如何設置：

• 右鍵單擊您希望自動化的工作表標籤，然後選擇 查看代碼。
• 在打開的 Microsoft Visual Basic for Applications 窗口中，將以下代碼粘貼到代碼窗格中：

Private Sub Worksheet_Change(ByVal Target As Range)
    'Automatically insert current date when any change occurs in column B (adjust to your needs)
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    If Not Intersect(Target, Range("B:B")) Is Nothing Then
        Target.Offset(0, 1).Value = Date 'Inserts date in column C when column B changes
    End If
End Sub

操作提示：

• 每次編輯B列中的單元格時，當前日期將自動出現在C列的相鄰單元格中（您可以根據設置需要調整目標範圍和偏移量）。
• 要將此邏輯應用於不同範圍或插入月份/年份，請相應地將 Date 修改為 Month(Date) 或 Year(Date)。
• 此方法最適合審計日誌或“最後更新”日期追蹤。確保啟用了宏以使此代碼正常運行。

場景2：通過點擊自定義按鈕插入當前日期、月份或年份，適用於自定義工作流程或按需時間戳記。

如何設置：

1. 點擊 開發工具 > Visual Basic。
2. 在VBA編輯器窗口中，點擊 插入 > 模塊
3. 輸入以下代碼（示例展示將當前日期插入A1單元格；您可以根據需要修改目標單元格或邏輯）：

Sub InsertCurrentDate()
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Worksheets("Sheet1").Range("A1").Value = Date
End Sub

如何將宏分配給Excel中的按鈕

1. 插入按鈕:
   1. 前往功能區上的 開發工具 頁籤。
   2. 點擊 插入 > 在表單控件下，選擇 按鈕（表單控件）。

      

2. 在工作表的任何位置繪製按鈕。
3. 分配宏:
   1. 繪製按鈕後，將彈出 分配宏 窗口。
   2. 選擇 InsertCurrentDate （或您為宏命名的名稱）。

      

4. 點擊 確定。

每次點擊該按鈕時，當前日期將被插入到Sheet1的A1單元格中。

您可以編輯宏以更改目標單元格、工作表，或插入當前月份或年份。

故障排除與注意事項：

• 如果宏無法運行，請確保您已在Excel設置中啟用了宏。
• 在將VBA代碼應用於重要文件之前，請先在樣本工作簿上測試以防止意外數據丟失。
• 將VBA與工作表控件結合使用可以實現強大且靈活的工作流程自動化，但在集成新宏之前請務必保存備份。

總之，VBA解決方案為Excel中的自動時間戳記提供了無與倫比的靈活性。特別推薦在標準公式或工具無法完全滿足您的工作流程需求時使用。