如何在 Excel 中將日期設為該月份的第一天？

作者Xiaoyang修改日期2025-09-04

當您在 Excel 中處理資料集時，經常需要將日期標準化——例如，將任意給定日期轉換為其所屬月份的第一天。這在財務分析、月度報表，或僅按月份分組資料（忽略具體日期）時特別實用，如下方範例所示。本指南將介紹兩種實用的 Excel 公式與一段 VBA 程式碼，助您輕鬆將任何日期轉換為對應月份的第一天。

使用公式將日期設為或轉換為指定月份的第一天

使用 VBA 將日期設為或轉換為指定月份的第一天

使用公式將日期設為或轉換為指定月份的第一天

若要快速將一連串隨機日期統一調整為各自月份的第一天，Excel 提供了幾種簡潔高效的公式。當您需要為資料透視表、月度彙總或定期資料檢視進行日期標準化時，這種方法格外實用。

太神奇了！在 Excel 中使用高效 Tabs，就像 Chrome、Edge、Firefox 和 Safari 一樣！
每天為您節省 50% 的時間，並減少數千次滑鼠點擊！

1. 點選緊鄰日期欄位旁的空白儲存格（例如，若原始日期位於）A2，則可使用 B2），並輸入下列公式：

=EOMONTH(A2,-1)+1

2. 輸入公式後，按下 Enter，儲存格將顯示 A2 中日期所對應月份的第一天。

3. 若要將此公式套用至其他日期，請將滑鼠移至儲存格右下角，直到出現填滿控點（+符號）。按住並向下拖曳該控點，涵蓋您要轉換的儲存格範圍，每個日期就會自動轉換為對應月份的第一天！請參閱截圖：

顯示在 Excel 中使用公式將隨機日期轉換為該月第一天的結果截圖

疑難排解與提示：

若公式結果顯示為序列號，您可能需要將儲存格格式設定為日期。請以滑鼠右鍵點擊該儲存格，選取設定儲存格格式，再挑選一種適合的日期格式，立即讓數據清晰呈現！
請確保 A 欄中的日期值採用有效的 Excel 日期格式，否則公式可能會傳回錯誤。

注意事項：

1. 若您偏好更簡潔的公式結構，或您的 Excel 版本不支援 EOMONTH 函數，也可使用以下替代公式。請在空白儲存格中輸入：

=DATE(YEAR(A2),MONTH(A2),1)

此公式直接從您的日期中提取年份與月份，並將日期設為 1，輕鬆取得該月的第一天。與先前相同，您只需向下拖曳公式，即可快速填滿欄中的其他儲存格。

2. 在上述兩種公式中，請將 A2 替換為您要轉換日期所在的儲存格參照；若資料位於不同欄位，請一併調整儲存格參照。

可用性與限制：

這些方法適用於標準 Excel 工作表。若您處理的是大型資料集，或需要針對多個檔案自動執行此操作，建議使用 VBA 或其他批次處理工具，以大幅提升效率。
公式最適合用於明確定義的日期欄位；若欄位中混雜其他資料類型，或包含看似日期的文字字串，則可能需事先清理資料。

使用 VBA 將日期設為或轉換為指定月份的第一天

對於經常需要在不同活頁簿中執行此操作，或需處理大量日期的使用者來說，使用 VBA 巨集能有效節省時間。若您希望一次轉換多個欄位，或自動化整個流程，這個方法同樣非常實用。操作步驟如下：

1. 前往開發人員工具 > Visual Basic 以開啟 VBA 編輯器。在編輯器視窗中，點選插入 > 模組，然後貼上以下程式碼：

Sub DatesToFirstOfMonth()
    Dim rng As Range
    Dim cell As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select the range for conversion", xTitleId, rng.Address, Type:=8)
    For Each cell In rng
        If IsDate(cell.Value) Then
            cell.Value = DateSerial(Year(cell.Value), Month(cell.Value), 1)
        End If
    Next cell
End Sub

2. 輸入程式碼後，點選（執行）按鈕，或按下 F5 以執行巨集。系統將提示您選取範圍——請選取包含日期值的儲存格範圍，所有選取的日期都會自動變更為各自月份的第一天。

若您收到「型別不符」錯誤，請確認所選儲存格是否包含有效的日期值。
執行 VBA 程式碼前，務必先儲存您的工作，因為巨集操作無法透過 Ctrl+Z 復原。

透過上述方法，無論您偏好使用公式，還是透過 VBA 自動化任務，都能高效將任何日期清單轉換為對應月份的第一天！請根據您的工作流程與資料規模，選擇最適合的方案。若遇到錯誤或非預期結果，請仔細檢查儲存格格式與參照，並考慮事先使用 Excel 的文字分列工具，清理模糊不清的日期值。

最佳 Office 生產力工具

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