MS Excel - Desejo contar valores exclusivos com base em uma coluna pai

Question

Sou muito novo no Excel. Eu preciso de alguma ajuda na contagem de valores únicos em cada uma das três colunas (considerando-as apenas uma de cada vez) em relação a uma coluna pai (a primeira (A) na imagem). Você pode por favor me ajudar? Obrigado!

Editar: se eu fizer uma tabela dinâmica, isso não me dará a contagem de colunas individuais, mas a coluna final.

Dados de origem:

Dadosdoresultadoapósatransformação:

Fonte

A   B   C   D
p   d   g   k
p   e   g   k
q   d   h   k
q   f   h   o
r   d   h   o
r   e   i   m
r   f   h   m
s   d   i   n
s   d   i   o
s   f   i   o

Resultado

A   B   C   D
p   2   1   1
q   2   1   2
r   3   2   2
s   2   1   2

    

Answer 1

Criamos uma lista da coluna A únicos e a colocamos na coluna E e, em seguida, executamos um conjunto de loops para contar os únicos nas outras colunas:

Sub Macro1()
    Dim N As Long, i As Long
    Dim c As Collection, v As Variant
    Dim M As Long, j As Long, rc As Long
    Dim K As Long

    Columns("A:A").Copy Columns("E:E")
    Range("E:E").RemoveDuplicates Columns:=1, Header:=xlNo

    rc = Rows.Count
    M = Cells(rc, "A").End(xlUp).Row
    N = Cells(rc, "E").End(xlUp).Row

    For i = 1 To N
        v = Cells(i, "E").Text
            For K = 2 To 4
                Set c = Nothing
                Set c = New Collection
                For j = 1 To M
                    If v = Cells(j, "A").Text Then
                        On Error Resume Next
                            c.Add Cells(j, K).Text, CStr(Cells(j, K).Text)
                        On Error GoTo 0
                    End If
                Next j
                Cells(i, K + 4).Value = c.Count
            Next K
    Next i
End Sub