ZÄHLENWENN
17.10.2019 14:17:59
Jehona
Neuer Versuch:
Werte aus Spalte A sollen gezählt werden und das Ergebnis der "Häufigkeit des Wertes" soll in Spalte B ausgegeben werden.
Mit meinem Skript wird nur hochgezählt..
Wie kriege ich es hin, das wirklich in jeder Zeile das Ergebnis der Häufigkeit ausgegeben wird?
A
10
10
10
B (Ist)
1
2
3
B (Soll)
3
3
3
Aktuelles Skript:
For z = 2 To 20000
If .Cells(z, 1).Value "" Then
found = True
.Cells(z, 2).Value = WorksheetFunction.CountIf(Range("A2:A" & z), Cells(z, 1))
End If
Next z