ich nutze sehr oft eine Formel mit der eine Spalte ab Zeile 2 ausgewertet wird, wann ein Zellinhalt das erste mal (= Original) oder das zweite mal oder öfters vorkommt (= doppelt):
in B2 und nach unten kopiert: =WENN(ZÄHLENWENN(A$2:A2;A2)=1;"Original";"doppelt")
Da teilweise Spalten mit mehreren Tausend Zeilen auszuwerten sind, wäre eine VBA-Lösung besser. Hierzu habe ich zunächst folgende Funktion erstellt:
Function Original(rng As Range)
Original = IIf(WorksheetFunction.CountIf(Range("A$2:A2"), rng) = 1, "Original", "doppelt" _
)
End Function
in B2 und nach unten kopiert: =Original(A2)Das klappt aber natürlich nicht, weil der "Rangebereich" A$2:A2 nach unten nicht "mitläuft". Leider sind zahlreiche Versuche, den Rangebereich anzupassen, gescheitert.
Besten Dank für eine Hilfe!
mfg