Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Doppelte Datensätze löschen

Gruppe

Bearbeiten

Problem

Wie kann ich alle in Spalte A doppelt vorkommenden Datensätze löschen?

Lösung
über Menü DATEN / FILTER / Spezialfilter / Kästchen "Keine Duplikate" aktivieren / Ausgabebereich angeben / Quellspalten löschen. te" aktivieren / Ausgabebereich angeben / Quellspalten löschen, oder über VBA mit nachfolgendem Code.

StandardModule: basMain

Sub SetFilter()
   Application.ScreenUpdating = False
   Range("A1").CurrentRegion.AdvancedFilter _
      Action:=xlFilterCopy, CopyToRange:= _
      Range("B1"), Unique:=True
   Columns(1).EntireColumn.Delete
   Application.ScreenUpdating = True
End Sub