Sollte eine Tabelle und deren ganzen Zeilen via Makro löschen,
wenn in Spalte A2:A150 ein Datensatz doppelt vorkommt.
Ab A2 deshalb, da A1 die Überschrift enthält.
Bitte keinen Sonderfilter sondern ein Makro.
Besten Dank vorab.
Gruß C.
Sollte eine Tabelle und deren ganzen Zeilen via Makro löschen,
wenn in Spalte A2:A150 ein Datensatz doppelt vorkommt.
Ab A2 deshalb, da A1 die Überschrift enthält.
Bitte keinen Sonderfilter sondern ein Makro.
Besten Dank vorab.
Gruß C.
probiers mal hiermit:
Sub Filtern()
With ActiveSheet.UsedRange
.Sort Key1:=Range(„A2“), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
.AdvancedFilter Action:=xlFilterCopy, CopyToRange:= _
Cells(1, .Columns.Count + 1), Unique:=True
.EntireColumn.Delete
End With
End Sub
aber bitte probiers mit einer Kopie deiner Datei!!!
habe dieses Makro nämlich noch nicht ausreichend getestet