Excel - 在一列中查找重復項，然后將數量總和到另一列中？

Question

在一列中查找重復項，然后將數量總和到另一列中

DATA       RESULT   

A  1       A  11
A  1       B  7
A  9       C  5
B  2       D  4
B  2       E  8
B  3            
C  5            
D  4            
E  7            
E  1    

Answer 1

對於EXCEL 365 （或 Excel Web 應用程序） ：

在C1 中輸入：

=UNIQUE(A1:A10)

在D1 中輸入：

=SUMIF(A1:A10,C1#,B1:B10)

編輯#1：

如果您可以接受 VBA，請嘗試：

Public Function unikue(rng As Range)
    Dim arr, c As Collection, r As Range
    Dim nCall As Long, nColl As Long
    Dim i As Long
    Set c = New Collection
    
    nCall = Application.Caller.Count
    
    On Error Resume Next
        For Each r In rng
            c.Add r.Text, CStr(r.Text)
        Next r
    On Error GoTo 0
    nColl = c.Count
    
    
    If nCall > nColl Then
        ReDim arr(1 To nCall, 1 To 1)
        For i = 1 To nCall
            arr(i, 1) = ""
        Next i
    Else
        ReDim arr(1 To nColl, 1 To 1)
    End If
    
    For i = 1 To nColl
        arr(i, 1) = c.Item(i)
    Next i
    
    unikue = arr
End Function

Answer 2

免責聲明：這是關於我們的工具 esProc。 我們被告知這是對 Excel 工作表進行分組的一種簡單而明顯的方法。

A1=file("D:/data.xlsx").xlsimport()
A2=A1.groups(_1;sum(_2))
A3=file("D:/result.xlsx").xlsexport(A2)

更多詳細信息，請參閱此帖子： 無需使用 Excel 對 XLS 文件進行分組和匯總