ich möchte einen Bereich (z.B. A1:A10) überprüfen, ob es dort Inhalte vorkommen, die in diesem Bereich öfter als einmal auftauchen, um dann mit "DANN" irgendwas machen zu können.
Kennt dazu jemand eine Formel?
Vielen Dank!
Gruß Christian
=wenn(zählewenn(........))
Gruß,
=WENN(ZÄHLENWENN(A1:A10;A1)>1;"Dann";"Sonst")
Der zweite Wert von 'Zählenwenn' ist dabei das Suchkriterium.Dim Zelle As Range, Bereich As Range
Set Bereich = Sheets("Tabelle1").Range("A1:A10")
For Each Zelle In Bereich.Cells
If WorksheetFunction.CountIf(Bereich, Zelle) > 1 Then
'Dann
Else
'Sonst
End If
Next Zelle
lg Matthias