اكسل

  Here I have VBA (UDF) which can help you to count unique values without using any kind of formula.

Function CountUnique(ListRange As Range) As Integer

Dim CellValue As Variant

Dim UniqueValues As New Collection

Application.Volatile

On Error Resume Next

For Each CellValue In ListRange

UniqueValues.Add CellValue, CStr(CellValue) ' add the unique item

Next

CountUnique = UniqueValues.Count

End Function

Enter this function in your VBE by inserting a new module and after that go to your worksheet and insert a following formula.

=CountUnique(range)