Ví dụ như hình dưới trong cột A , giá trị 1 xuất hiện 3 lần nhưng khi tính toán bạn chỉ tính nó là 1 . Tương tự như vậy giá trị 2 xuất hiện 3 lần nhưng chỉ coi là 2 …Như vậy bạn cần tính tổng trong cột A chỉ lấy một lần giá trị mà thôi và bạn cần tạo một Hàm sô SumUniqueValues các thức như sau :

Mở Excel và File cần tính toán . Bấm tổ hợp phím Alt_F11 , cửa sổ Visual Basic mở ra , bạn chọn menu Insert > Modules và dán theo nội dung bên dưới

Function SumUniqueValues(InputRange As Range) as Double

Dim cl As Range, UniqueValues As New Collection, uValue As Variant

    Application.Volatile

    On Error Resume Next

    For Each cl In InputRange

        UniqueValues.Add cl.Value, CStr(cl.Value)

    Next cl

    On Error GoTo 0

    SumUniqueValues = 0

    For Each uValue In UniqueValues

        SumUniqueValues = SumUniqueValues + uValue

    Next uValue

End Function

Quay trở về Excel và tại ô kết quả bạn gõ hàm

SumUniqueValues ( A1:A100 )