如何合并重復的行并在Excel中對值求和?
在Excel中,當您具有一系列包含某些重復項的數據時,您可能總是會遇到此問題,現在您想要合并重復數據并在另一列中求和相應的值,如下面的屏幕快照所示。 您如何解決這個問題?
合并重復的行并使用合并功能將值求和
合并重復的行并使用VBA代碼對值求和
合并重復行并將值與 Kutools for Excel
根據另一列中的重復值合并相應的行 Kutools for Excel
合并重復的行并使用合并功能將值求和合并是我們在Excel中合并多個工作表或行的有用工具,因此使用此功能,我們還可以基于重復項匯總多個行。 請執行以下步驟:
1。 單擊要在當前工作表中找到結果的單元格。
2。 點擊 Data > 整合,請參見屏幕截圖:
3。 在 整合 對話框:
(1.)選擇 總和 止 功能 下拉列表;(2.)點擊 按鈕以選擇要合并的范圍,然后單擊 地址 按鈕將引用添加到 所有參考 列表框;(3.)檢查 第一排 和 左欄 止 在中使用標簽 選項。 看截圖:4。 完成設置后,單擊 OK,然后將重復項進行合并和求和。 看截圖:
備注:如果范圍內沒有標題行,則需要取消選中 第一排 來自 在中使用標簽 選項。
合并重復的行并在另一列中求和/求平均值
Kutools for Excels 高級組合行 幫助您將多個重復的行基于一個關鍵列組合到一條記錄中,并且還可以對其他列應用一些計算,例如總和,平均值,計數等。 點擊下載 Kutools for Excel!
合并重復的行并使用VBA代碼對值求和以下VBA代碼還可以幫助您合并工作表中的重復行,但是同時,原始數據將被破壞,您需要備份數據的副本。
1。 按住 ALT + F11 鍵,然后打開 Microsoft Visual Basic應用程序 窗口。
2。 點擊 插頁 > 模塊,然后將以下代碼粘貼到 模塊窗口.
VBA代碼:合并重復的行并求和
Sub CombineRows()Updateby ExtendofficeDim WorkRng As RangeDim Dic As VariantDim arr As VariantOn Error Resume NextxTitleId = "KutoolsforExcel"Set WorkRng = Application.SelectionSet WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)Set Dic = CreateObject("scripting.Dictionary")arr = WorkRng.ValueFor i = 1 To UBound(arr, 1)Dic(arr(i, 1)) = Dic(arr(i, 1)) + arr(i, 2)NextApplication.ScreenUpdating = FalseWorkRng.ClearContentsWorkRng.Range("A1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.keys)WorkRng.Range("B1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.items)Application.ScreenUpdating = TrueEnd SubCopy3。 然后按 F5 鍵以運行此代碼,并且需要在彈出的提示框中選擇要合并的范圍。 看截圖:
4。 然后點擊 OK,重復的行已合并,并將值相加。
備注:如果要使用此代碼,則最好制作一個文件副本以避免破壞數據,并且此代碼僅適用于兩列。
合并重復行并將值與 Kutools for Excel
在這里,我介紹方便的工具- Kutools for Excel 對你來說 高級組合行 也可以迅速幫忙解決這個問題。
Kutools for Excel : 帶有300多個便捷的Excel加載項,可以在內. 立即獲取 .前往下載購買貝寶/ MyCommerce安裝后 Kutools for Excel,請執行以下操作:
1. 選擇所需的范圍,然后單擊 Kutools > 合并與拆分> 高級組合行。 看截圖:
2。 在 高級組合行 對話框,檢查 我的數據有標題 如果您的范圍有標題,然后選擇要合并重復項的列名,然后單擊 首要的關鍵,請參見屏幕截圖:
3。 然后選擇要對值求和的列名,然后單擊 計算 > 總和 或其他需要的計算。 看截圖:
4。 點擊 Ok 關閉對話框,則可以看到重復項已合并,并且另一列中的相應數據也已累加在一起。 查看屏幕截圖:
單擊此處以了解有關“高級合并行”的更多信息。
根據另一列中的重復值合并相應的行 Kutools for Excel有時,您想根據另一列中的重復值來合并行, 高級組合行 of Kutools for Excel也可以幫您一個忙,請執行以下操作:
1。 選擇您要使用的數據范圍,然后單擊 Kutools > 合并與拆分 > 高級組合行 使之成為可能 高級組合行 對話框。
2。 在 高級組合行 對話框中,單擊要基于其合并其他數據的列名,然后單擊“確定”。 首要的關鍵,請參見屏幕截圖:
3. 然后單擊您想要合并數據的另一個列名稱,然后單擊 結合 選擇一個分隔符來分隔您的組合值,請參見屏幕截圖:
4。 然后點擊 Ok,則A列中所有具有相同單元格的值已合并在一起,請參見屏幕截圖:
合并重復行并將值與 Kutools for ExcelKutools for Excel:具有300多個方便的Excel加載項,可以在內,沒有任何限制。 立即下載并!相關文章:
根據重復的值將多行合并為一行
最佳辦公生產力工具
將小時轉化為分鐘 Kutools for Excel!準備好增強您的 Excel 任務了嗎? 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel!
為什么需要 Kutools for Excel