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
