Skip to main content

Kutools for Office — 一套工具,五種功能。完成更多工作。

如何在Excel中列出指定月份的所有日期?

Author: Siluvia Last Modified: 2025-08-23

在Excel中處理基於日期的數據時,創建某個特定月份每一天的列表是一個常見的需求,例如用於計劃、排程、報告或追蹤目的。儘管Excel的填充序列功能通常用於此任務,但確保列表不會超出該月最後一天可能會有挑戰,特別是對於天數不同的月份。如果您需要一種方法來自動生成匹配任何指定月份精確天數的準確列表,本文提供了幾種針對不同Excel技能水平和場景的實用解決方案。

使用公式列出指定月份的所有日期

VBA代碼 - 自動生成一個月的所有日期

內置Excel方法 - 填充序列功能


使用公式列出指定月份的所有日期

公式是一種靈活且基於單元格的解決方案,適合任何需要列出某個月份所有日期的人。此方法可讓您自動生成並填寫日期,無需手動計算天數。它非常適合簡單且可重複的任務,尤其是當您準備多個不同月份的工作表時。請按照以下步驟操作:

1. 首先,在空白單元格中輸入目標月份的第一天。例如,在單元格A2中輸入2016/7/1。您可以根據需要使用目標月份和年份。

2. 點擊起始日期下方的單元格(這裡是單元格A3)。輸入以下公式並按下Enter鍵:

=IF(A2="","",IF(MONTH(A2+1)<>MONTH(A2),"",A2+1))

A screenshot showing the formula entered below the first date of the specified month

這個公式會檢查是否增加日期,並且當日期超出您開始的月份時會將單元格留空。即使您拖動超過月底,也不會顯示額外的日期。

3. 接下來,確保結果單元格以日期格式顯示。找到剛才輸入公式的單元格,然後導航到「Home」>「Number Format」下拉選單 > 「Short Date」。這一步很重要——如果單元格處於「General」或「Number」格式,您可能只會看到序列號而不是實際日期。

A screenshot showing the process to format a cell to display dates in Excel

4. 在仍然選擇公式單元格的情況下,向下拖動填充柄(單元格右下角的小方塊)。繼續拖動超過預期的天數——例如,如果月份是七月,可以安全地拖動至少31行。無論您拖動多遠,日期只會填充屬於指定月份的單元格,防止溢出到下個月。

A screenshot showing all dates in a specified month listed in Excel using Fill Handle


VBA代碼 - 自動生成指定月份的所有日期

對於希望避免手動輸入公式的用戶,特別是在多次生成日期列表或多個工作表之間操作時,簡單的VBA宏可以自動化此過程。這種方法特別適用於希望通過幾次點擊生成可自定義日期序列的情況。使用VBA,您可以提示輸入目標月份和年份,代碼將快速為您生成所有相關日期。

1. 點擊「Developer Tools」>「Visual Basic」以打開Microsoft Visual Basic for Applications編輯器。在VBA編輯器中,點擊「Insert」>「Module」並將以下代碼粘貼到新創建的模塊中:

Sub ListAllDatesOfMonth()
    Dim y As Integer
    Dim m As Integer
    Dim startDate As Date
    Dim endDate As Date
    Dim i As Integer
    Dim xTitleId As String
    Dim destCell As Range
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    y = Application.InputBox(prompt:="Please enter the year (e.g.2023)", Title:=xTitleId, Type:=1)
    If y = 0 Then Exit Sub
    
    m = Application.InputBox(prompt:="Please enter the month number (1-12)", Title:=xTitleId, Type:=1)
    If m = 0 Then Exit Sub
    
    Set destCell = Application.InputBox(prompt:="Select the starting cell for your dates", Title:=xTitleId, Type:=8)
    If destCell Is Nothing Then Exit Sub
    
    startDate = DateSerial(y, m, 1)
    endDate = DateSerial(y, m + 1, 0)
    
    For i = 0 To endDate - startDate
        destCell.Offset(i, 0).Value = startDate + i
    Next i
    
    destCell.Resize(endDate - startDate + 1, 1).NumberFormat = "yyyy/m/d"
End Sub

2點擊 Run button Run 按鈕(或按下 F5),並根據提示輸入年份、月份以及選擇日期應該開始的單元格。

注意與技巧:

  • 對於月份輸入,輸入數字即可——一月為1,二月為2,依此類推。
  • 所有生成的日期都將格式化為「yyyy/m/d」。如果需要,可以在NumberFormat行中編輯日期格式。
  • 如果輸入錯誤或想重新生成列表,只需重新運行宏即可。
  • 當您經常創建日期列表或自動化重複報告時,這個解決方案最為合適。

內置Excel方法 - 填充序列功能

另一種直接的內置Excel方法是使用填充序列功能來列出一個月中的所有天數——這種方法特別適合不熟悉公式或VBA的用戶。通過明確定義步長值(1天)並指定終止值為目標月份的最後一天,您可以為任何月份創建準確的日期列表。

  1. 在空白單元格中輸入特定月份的第一天(例如,在A2中輸入2023/4/1表示2023年4月1日)。確保Excel將您的輸入識別為日期——如果不確定,可以在單元格中使用=DATE(2023,4,1)以確保清晰。
  2. 選擇起始單元格(A2)。然後,前往「Home」>「Fill」>「Series...」以打開「Series」對話框。
  3. 在「Series」對話框中:
    • 如果希望日期沿列排列,選擇「Columns」;如果希望水平排列,選擇「Rows」。
    • 將「Type」設置為「Date」。
    • 將「Date unit」設置為「Day」。
    • 將「Step value」設置為1(每次遞增一天)。
    • 在「Stop value」中,輸入目標月份的最後一天。例如,如果是2023年4月,輸入2023/4/30
  4. 點擊「OK」。Excel現在將填充所選單元格範圍,列出指定月份從第一天到最後一天的所有日期。

優勢與注意事項:

  • 此方法不需要記憶或編輯公式。
  • 您需要手動提供每個月份的起始和終止日期。
  • 如果終止值出錯,列表將不完整或包含額外的天數。請仔細檢查結束日期,特別是二月和閏年的情況。
  • 填充序列後,如果需要,可以使用「Home」>「Number Format」將所有單元格格式化為日期。

上述每種解決方案都有其獨特的優勢:公式動態且易於複製到其他月份;VBA支持大規模使用的單擊自動化;填充序列對於偶爾執行的任務快速且直觀。如果遇到問題,請確認輸入的日期格式可被識別,並且在使用VBA時,確保啟用了宏並選擇了有效的單元格範圍。對於更複雜的排程(包括週末、假日或特定工作日),可能需要額外的公式邏輯或VBA適配。

最佳 Office 生產力工具

🤖 Kutools AI 助手:以智能執行為基礎,革新數據分析 生成程式碼 創建自訂公式 分析數據並生成圖表 調用 Kutools 增強函數
熱門功能查找、選取項目的背景色或標記重複值刪除空行合併列或單元格且不遺失數據四捨五入(免公式)...
高級 LOOKUP多條件 VLookup多值 VLookup多表查找模糊查找...
高級下拉列表快速創建下拉列表 依賴型下拉列表 多選下拉列表...
列管理器添加指定數量的列移動列切換隱藏列的顯示狀態比較區域及列...
精選功能網格聚焦 設計檢視 增強編輯欄 工作簿及工作表管理器 資源庫(快捷文本) 日期提取器 合併資料 加密/解密儲存格 按列表發送電子郵件 超級篩選 特殊篩選(篩選粗體/傾斜/刪除線...)...
15 大工具集12 項文本工具添加文本刪除特定字符…)50+ 儀表 類型甘特圖等)40+ 實用 公式基於生日計算年齡等)19 項插入工具插入QR码根據路徑插入圖片等)12 項轉換工具金額轉大寫匯率轉換等)7 項合併與分割工具高級合併行分割儲存格等)...及更多
使用 Kutools,語言任你選 — 支援英語、西班牙語、德語、法語、中文及超過40 種語言!

運用 Kutools for Excel,全面提升您的 Excel 技能,體驗前所未有的高效。 Kutools for Excel 提供超過300 項進階功能,讓您提升工作效率、節省時間。 點此尋找您最需要的功能...


Office Tab 為 Office 帶來分頁介面,讓您的工作更加輕鬆簡單

  • 在 Word、Excel、PowerPoint 中啟用分頁編輯與閱讀
  • 在同一視窗的新分頁中打開與創建多份文件,而非開啟新視窗。
  • 提升您的生產力50%,每日可幫您減少數百次鼠標點擊!

所有 Kutools 外掛,一次安裝

Kutools for Office 套裝整合了 Excel、Word、Outlook 和 PowerPoint 的外掛,外加 Office Tab Pro,非常適合需要跨 Office 應用程式協同作業的團隊。

Excel Word Outlook Tabs PowerPoint
  • 全合一套裝 — Excel、Word、Outlook及 PowerPoint 外掛 + Office Tab Pro
  • 一鍵安裝,一份授權 — 幾分鐘完成設置(支援 MSI)
  • 協同運作更順暢 — Office 應用間無縫提升生產力
  • 30 天全功能試用 — 無需註冊、無需信用卡
  • 最超值 — 一次購買,節省單獨外掛費用