Hallo Zusammen,

ich habe eine Tabelle die Werte hat die mehrmals vorkommen. 
In einer neuen Tabelle habe ich die Tabelle bereits so organisiert, dass jeder Wert genau einmal vorkommt.
Jetzt möchte ich aber gerne eine Spalte haben (zB Spalte C) die mir jeweils zu Spalte A angibt, wie oft dieser Wert/Zeile in der "unsortierten" Tabelle vorkommt.
Obendrein soll sie in der Spalte "B" der jeweiligen Zeilen nachschauen, ob sie gefüllt ist oder nicht und die dann mitzählen.
Sodass in Spalte "C" beispielsweise der Wert "5/7" rauskommt. -> also 7 gleiche Werte waren vorhanden und davon waren 5 in Spalte B befüllt.
Ich hoffe, dass ich es einigermaßen verständlich vormuliert habe.

Vielen Dank im Voraus

Hier mein Ansatz:


Sub Zähler()
    
    Dim i As Long
    Dim n As Long
    Dim k As Long

  
    Dim letztezeileInS2 As Long

    letztezeileInS2 = Sheets(2).UsedRange.SpecialCells(xlCellTypeLastCell).Row

     Dim letzteZeileInS1 As Long
    
    Dim zähler As Long
    Dim nenner As Long
    
    
    For i = 2 To letztezeileInV
        
        letzteZeileInS1 = Sheets(1).UsedRange.SpecialCells(xlCellTypeLastCell).Row
       
        zähler = 0 
        nenner = 0
        
        For n = 2 To letzteZeileInS1
       
            
            If Sheets(2).Cells(i, 1).Value = Sheets(1).Cells(n, 1).Value Then
                nenner = nenner +1
                
                If Sheets (2).Cells(2).Value <> ""
                zähler = zähler +1
                
                Sheets(1).Cells(n, 3) = zähler & "/" & nenner
                End If 

            End If
            
        Next n
        
    Next i
    
End Sub