ich habe ein Problem das vll auch andere haben und zwar entferne ich in einem Tabellenblatt alle doppelten Einträge mit diesen Code:
Sub Makro1()
ActiveSheet.Range("$D$5:$L$403").RemoveDuplicates Columns:=Array(1, 2, 4, 5), _
Header:=xlYes
End Sub
Dies funktioniert wunderbar, aber mein Problem ist das die Spalten formatiert sind und wenn ich die Duplikate entfernen lasse sind die Zeilen die entfernt wurden weiß und die Formatierung ist weg. Ich möchte also beim entfernen der Duplikate nur die Werte entfernen aber nicht meine Formatierung.Gruß Marco