如何在Excel中根據相同日期對應的值求和？

當處理包含重複日期條目的Excel數據集時，您可能會發現需要總結與每個日期相關的量化數據。例如，假設您管理一組訂單記錄，如下方範圍A1:B13所示，其中A列列出日期（某些日期可能出現多次），B列則記錄相應的訂單數量。如果您想對每個唯一日期的訂單總數進行求和以生成摘要結果，Excel提供了幾種方法來高效且準確地完成此任務。這項功能對於每日銷售總結、合併日誌記錄或任何需要基於相同時間點聚合數據的場景來說都是無價之寶。選擇正確的方法可以節省大量手動操作並幫助確保數據準確性。

• 根據相同日期使用公式對應求和
• 使用Kutools for Excel根據相同日期對應求和
• 使用VBA代碼根據相同日期對應求和
• 使用樞紐分析表根據相同日期對應求和

根據相同日期使用公式對應求和

最直接的解決方案之一是使用Excel的SUMIF函數。這種方法特別適合當您希望創建一個隨著源數據變化而自動更新的動態摘要時。公式方法應用簡單，對於不是過於龐大的數據範圍效果很好。請按照以下步驟操作：

1. 在希望特定日期總數出現的空白單元格中輸入以下公式（例如，E2）：

=SUMIF($A$2:$A$13,D2,$B$2:$B$13)

2. 從您輸入公式的單元格拖曳填滿控制把向下應用到所有唯一的日期。這樣將會填充一個摘要列，每行顯示對應日期的總求和值。見截圖：

使用Kutools for Excel根據相同日期對應求和

如果您已安裝Kutools for Excel，高級合併行工具可以使此任務更加簡便。這個解決方案讓您可以按某個關鍵字段（在此情況下為日期）合併行，並自動求和相應的值，節省時間並減少公式錯誤的可能性。對於經常需要總結大範圍或執行重複合併和計算操作的用戶尤其有用。

安裝Kutools for Excel後，請按以下步驟操作：

1. 選擇要按相同日期求和的數據範圍。（建議在繼續之前備份原始數據，因為此工具將轉換您的數據布局。）

2. 前往Kutools > 合併與拆分 > 高級合併行。

3. 在對話框中，選擇您的日期列並將其設置為主鍵。接下來，選擇要進行求和的列（例如「訂單」），並在其計算部分設置操作為求和。該設置告訴Kutools通過相同的日期分組行並通過求和來合併它們的數值。

4. 點擊確定。Kutools將立即生成摘要列表，以便對於每個唯一的日期，所有對應的金額值都在一行內求和。見下文：

使用VBA代碼根據相同日期對應求和

對於尋求自動化或可編程方法的用戶，VBA（Visual Basic for Applications）提供了一種靈活的方式來按日期求和值並將摘要導出到新的範圍。VBA非常適合處理重複性任務、處理大型數據集或將摘要整合到更廣泛的工作流程中——特別是當內建公式或功能不足以滿足您的需求時。

1. 點擊開發工具 > Visual Basic 打開Microsoft Visual Basic for Applications編輯器。在窗口中，點擊插入 > 模塊並將下面的代碼粘貼到模塊中：

Sub SumValuesByDate()
    Dim SourceRange As Range
    Dim OutputRange As Range
    Dim Dict As Object
    Dim Cell As Range
    Dim iRow As Long
    Dim LastRow As Long
    Dim ws As Worksheet
    Dim kDate As Variant
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set ws = Application.ActiveSheet
    
    ' Prompt for source data range containing dates and values
    Set SourceRange = Application.InputBox("Select the source data range (dates in first column, values in second):", xTitleId, ws.Range("A2:B13").Address, Type:=8)
    
    If SourceRange Is Nothing Then Exit Sub
    
    ' Prompt for output location
    Set OutputRange = Application.InputBox("Select the cell to output summary (top-left cell):", xTitleId, "E1", Type:=8)
    
    If OutputRange Is Nothing Then Exit Sub
    
    Set Dict = CreateObject("Scripting.Dictionary")
    
    ' Loop through data and sum by date
    For iRow = 1 To SourceRange.Rows.Count
        kDate = SourceRange.Cells(iRow, 1).Value
        If kDate <> "" And IsDate(kDate) Then
            If Dict.Exists(kDate) Then
                Dict(kDate) = Dict(kDate) + SourceRange.Cells(iRow, 2).Value
            Else
                Dict.Add kDate, SourceRange.Cells(iRow, 2).Value
            End If
        End If
    Next
    
    ' Write header
    OutputRange.Cells(1, 1).Value = "Date"
    OutputRange.Cells(1, 2).Value = "Sum"
    
    ' Write result to output range
    iRow = 2
    For Each kDate In Dict.Keys
        OutputRange.Cells(iRow, 1).Value = kDate
        OutputRange.Cells(iRow, 2).Value = Dict(kDate)
        iRow = iRow + 1
    Next
End Sub

2. 點擊 按鈕或按下 F5 運行宏。

3. 對話框將提示您選擇原始數據範圍（確保日期在第一列，值在第二列）。然後另一個對話框允許您指定輸出結果的位置（例如，單元格E1）。

4. 確認後，將從您選擇的輸出單元格開始生成日期及其對應值總和的摘要表。

當您需要自動化批量處理或希望避免手動干預時，VBA效果最佳。它是大規模或定期重複數據合併的絕佳選擇。然而，如果您只需要偶爾的摘要，公式或樞紐分析表方法可能更簡單。

使用樞紐分析表根據相同日期對應求和

樞紐分析表提供了一種便捷且無需公式的按日期分組數據並計算求和的方法，只需幾次點擊即可完成。它特別適合大型數據集或當您想要交互式探索和分析數據時。樞紐分析表可以在數據變更時自動刷新，使其適合作為持續報告和儀表板的一部分。

1. 選擇原始數據範圍，包括標題（例如，A1:B13）。

2. 前往插入選項卡並選擇樞紐分析表。在對話框中，確認您的數據範圍並選擇放置樞紐分析表的位置（新工作表或現有工作表）。

3. 在樞紐分析表字段列表中，將日期字段拖到行區域，並將相應的訂單（或您的值字段）拖到值區域。Excel將自動對每個唯一日期的值進行求和。

4. 當原始數據發生變化時，若要更新樞紐分析表結果，請右鍵單擊樞紐分析表並選擇刷新。