如何在 Excel 中將週數轉換為對應的日期，或將日期反向轉換為週數？

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

在商業分析、專案規劃與報表製作中，處理日期與週數是常見需求。例如，您可能想知道某個日期屬於哪一週，或找出特定年份中某個週數對應的完整日期範圍。然而，Excel 並未內建直接選項，能將週數轉換為完整的日期範圍，或快速反向執行此操作。為滿足這些需求，您可以根據實際情境與資料量，靈活運用多種公式、VBA 解決方案及其他 Excel 功能。以下是在 Excel 中處理此任務的幾種實用方法。

使用公式將週數轉換為日期

使用公式將日期轉換為週數

使用 VBA 程式碼在週數與日期之間相互轉換

使用公式將週數轉換為日期

假設您的工作表中已輸入特定年份與週數（例如，）2015 位於儲存格 B1，15 位於儲存格 B2），您可能希望計算該週的實際開始日期（星期一）與結束日期（星期日）。這在排程規劃、準備每週摘要或參考週期性報表時特別實用！
範例資料

若要計算指定週數的日期範圍，可使用下列 Excel 公式：

1. 選取一個空白儲存格（此處為儲存格）B5）以顯示開始日期，輸入下列公式後按下 Enter 鍵，公式將傳回代表日期的序列號。

=MAX(DATE(B1,1,1),DATE(B1,1,1)-WEEKDAY(DATE(B1,1,1),2)+(B2-1)*7+1)

2. 若要取得同一週的結束日期（例如儲存格）B6），請輸入下列公式後按下 Enter，公式將傳回指定週最後一天的序列號。

=MIN(DATE(B1+1,1,0),DATE(B1,1,1)-WEEKDAY(DATE(B1,1,1),2)+B2*7)

注意：上述公式中，B1 為包含年份的儲存格（例如 2015），而 B2 則為您要轉換的週數所在儲存格。請根據實際工作表調整這些儲存格參照。

3. 公式最初傳回的是數字而非格式化日期。若要正確顯示日期格式，請同時選取兩個公式儲存格，然後前往首頁＞ 數字格式 下拉式選單＞ 短日期，即可將數值轉換為易讀的日期格式！
將公式儲存格格式設定為日期

提示：這些公式採用 ISO 週日曆系統（每週從星期一開始），此系統廣泛應用於歐洲的薪資與報表標準。若貴組織採用不同的週數計算方式，結果可能有所差異。請務必針對年初落在週中間的年份（例如 1 月 1 日非星期一）或包含 53 週的年度，仔細核對計算結果。

使用公式將日期轉換為週數

反之，您可能需要判斷某個日期所屬的週數。WEEKNUM 函數正是 Excel 為此目的而設，特別適用於分析工時表資料、產出每週報表，或依週追蹤交貨與活動進度！

1. 選取一個空白儲存格來輸出週數，並輸入下列公式（假設您的日期位於）B1）：

=WEEKNUM(B1,1)

2. 接著按下 Enter，此公式將傳回以星期日作為每週第一天的週數。
使用公式將日期轉換為週數

注意事項：

(1) 此公式中，B1 為包含欲轉換日期的儲存格。

(2) 若您偏好以星期一作為每週起始日（ISO 週系統常見做法），請使用下列版本的公式：

=WEEKNUM(B1,2)

使用 VBA 程式碼在週數與日期之間相互轉換

本文將介紹兩段 VBA 常式：一段能將週數（及年份）轉換為對應的日期範圍，另一段則可判斷任意指定日期所屬的 ISO 週數。

將週數轉換為日期範圍：

1. 按一下開發人員＞Visual Basic，開啟 VBA 編輯器。在開啟的視窗中，按一下插入＞模組，並將下方程式碼貼到模組中：

Sub WeekNumberToDateRange()
    Dim YearNum As Long
    Dim WeekNum As Long
    Dim FirstDay As Date, LastDay As Date
    Dim Jan4 As Date
    YearNum = Application.InputBox("Enter the year:", "KutoolsforExcel", Year(Date), Type:=1)
    If YearNum < 1 Then Exit Sub
    WeekNum = Application.InputBox("Enter the week number:", "KutoolsforExcel", 1, Type:=1)
    If WeekNum < 1 Then Exit Sub
    Jan4 = DateSerial(YearNum, 1, 4)
    FirstDay = Jan4 - Weekday(Jan4, vbMonday) + 1
    FirstDay = FirstDay + (WeekNum - 1) * 7
    LastDay = FirstDay + 6
    MsgBox "Start date: " & Format(FirstDay, "yyyy-mm-dd") & vbCrLf & _
           "End date:   " & Format(LastDay, "yyyy-mm-dd"), _
           vbInformation, "KutoolsforExcel"
End Sub

2. 使用按鈕執行巨集。系統將提示您輸入年份與週數，並在對話方塊中立即顯示對應的日期範圍。

將日期轉換為週數：

1. 將下列 VBA 程式碼複製並貼到模組中：

Sub DateToWeekNumber()
 Dim InputDate As Date
 Dim WeekNum As Integer
 InputDate = Application.InputBox("Enter the date (yyyy-mm-dd):", "KutoolsforExcel", Date, Type:=2)
 WeekNum = WorksheetFunction.WeekNum(InputDate, 2)
 MsgBox "The week number is: " & WeekNum, vbInformation, "KutoolsforExcel"
End Sub

2. 插入並執行此程式碼後，系統將提示您輸入目標日期，巨集會顯示以星期一起算的週數。只需將 WeekNum 函數中的第二個參數修改為 1，即可讓每週從星期日開始計算！

提示：若您的週系統不同，請相應調整 VBA 程式碼中的 vbMonday 或 vbSunday。

只需一鍵即可在 Excel 中將多個非標準格式化日期轉換為標準日期

Kutools for Excel 的日期識別工具能輕鬆辨識並轉換非標準日期、數字（例如 yyyymmdd）或純文字，只需一鍵即可在 Excel 中轉為標準日期格式，大幅提升工作效率，同時減少手動轉換錯誤！立即免費試用完整功能 30 天！
ad 轉換為日期

如何在 Excel 中計算兩個日期之間特定星期幾的天數？

如何在 Excel 中對日期進行天數、月份或年份的加減運算？

最佳 Office 生產力工具

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