Ist es Wahr das zum Sortieren einiger Zellen dieses Code-monster getippt werden muss und wenn ja, was muss ich umstricken das er auch bei mir funktioniert?
Selection.Sort Key1:=Range("D1:D8"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
"Anwendungs oder Objektdefinierter Fehler (1004) ist die Meldung
Zum Objekt:
Ein Makro vergleicht zwei Tabellen und erstellt eine Liste mit Übereinstimmungen.(Code aus diesem Forums-Archiv)Alles in einem Arbeitsblatt. Zur weiteren Verarbeitung der Liste muss diese sortiert sein.
Wenn ein Haeder eine Zelle oberhalb der Liste ist, so ist dieser nicht vorhanden.
Vielen Dank schon mal im voraus
Thomas