Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender Navigationstipps
Inhaltsverzeichnis

Mehrfach vorhanden dann löschen

Mehrfach vorhanden dann löschen
23.02.2005 20:24:07
Klaus
Hallo,
ich habe in Spalte c daten stehen, die mehrfach vorhanden sind.
Ich möchte die Zeilen löschen die in Spalte c doppelt bis dreizigfach vorhanden sind. So, das die Daten der Spalte c immer nur einmal vorkommen.
Es kann auch sein das in der Spalte c die Zelle nur einmal vorhanden ist.
Dann muß diese Zeile stehen bleiben.
Ich komme nicht weiter.
Ich habe die Recherche durchsucht, doch leider ohne Erfolg.
Vielen Dank im voraus für eure Hilfe
Klaus

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mehrfach vorhanden dann löschen
Bert

Sub stark_vereinfacht()
Dim z As Long
Application.ScreenUpdating = False
For z = [c65536].End(xlUp).Row To 1 Step -1
If Application.CountIf([C:C], Cells(z, 3)) > 1 Then Rows(z).Delete
Next
Application.ScreenUpdating = True
End Sub

Bert
AW: Mehrfach vorhanden dann löschen
Klaus
Hallo Bert,
wieso stark vereinfacht?
Das ist genau das wonach ich gesucht habe.
Ich bin immer überrascht, wie ihr das alles so hinbekommt.
Vielen Dank
Klaus
AW: Mehrfach vorhanden dann löschen
Bert
Professionell müßte da schon etwas mehr Aufwand betrieben werden.
Bert
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige