O professor usou a função: '=cont.valores(único(tb_saidas[Produtos]))
Porém nas versões anteriores o excel não interpreta o "ÚNICO"
Criei uma função em VBA para poder usar uma variação dessa função No Excel aperte Alt+F11 Criei um novo modulo
Function ContarUnicos(intervalo As Range) As Long Dim dict As Object Dim celula As Range Set dict = CreateObject("Scripting.Dictionary")
For Each celula In intervalo
If Not dict.exists(celula.Value) And Not IsEmpty(celula.Value) Then
dict.Add celula.Value, Nothing
End If
Next celula
ContarUnicos = dict.Count
End Function
Salve
Agora você pode usar '=ContarUnicos(TB_Saídas[Produto])
O resultado é o mesmo
