Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Sortierung mit mehr als 3 Kriterien

Sortierung mit mehr als 3 Kriterien
20.02.2008 17:12:03
Gordon
Moin,
die normale Excel-Sortierungsfunktion läßt ja nur 3 Spalten als Kriterien für eine Sortierung zu. Kann man mit VBA eigentlich mehr als 3 Sortierkriterien hinbekommen. Hatte es eben mal so probiert:

Worksheets("Tabelle2").Range("f22:J25").Sort _
Key1:=Worksheets("Tabelle2").Range("G22"), Order1:=xlDescending, _
Key2:=Worksheets("Tabelle2").Range("H22"), Order1:=xlDescending, _
Key3:=Worksheets("Tabelle2").Range("I22"), Order1:=xlDescending, _
Key4:=Worksheets("Tabelle2").Range("J22"), Order1:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom


Leider funktioniert das nicht so mit dem Key4. Es erscheint der Laufzeitfehler '1004'. Wenn ich die Zeile, wo Key4 steht, streiche, sortiert er wieder ganz normal nach drei Spalten. Gibt's da einen Trick bzw. hat jemand den Fehler bei mir entdeckt?
Gruß
Gordon

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Sortierung mit mehr als 3 Kriterien
20.02.2008 17:15:42
Horst
Hi,
bei drei ist Sense, sortier zuerst die unwichtigeren Spalten.
mfg Horst

AW: Sortierung mit mehr als 3 Kriterien
20.02.2008 17:24:17
Gordon
Hmm..ok....hätte ich nicht gedacht, dass es dort so eingeschränkt ist, aber ok. Kann man nichts machen. Danke für die Info.... :o(

AW: Sortierung mit mehr als 3 Kriterien
20.02.2008 23:00:00
Uduuh
Hallo,
den Bereich in ein Array einlesen,das hier
http://www.online-excel.de/excel/singsel_vba.php?f=97
und zurückschreiben.
Gruß aus’m Pott
Udo

Anzeige
AW: Sortierung mit mehr als 3 Kriterien
21.02.2008 19:06:41
Gordon
Danke für den Hinweis. Werde ich mir mal in einer ruhigen Minute genauer anschauen.
Habe das Problem nun so gelöst:

Worksheets("Tabelle2").Range("F22:L25").Sort _
Key1:=Worksheets("Tabelle2").Range("L22"), Order1:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Worksheets("Tabelle2").Range("F22:L25").Sort _
Key1:=Worksheets("Tabelle2").Range("K22"), Order1:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Worksheets("Tabelle2").Range("F22:L25").Sort _
Key1:=Worksheets("Tabelle2").Range("J22"), Order1:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Worksheets("Tabelle2").Range("F22:L25").Sort _
Key1:=Worksheets("Tabelle2").Range("I22"), Order1:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Worksheets("Tabelle2").Range("F22:L25").Sort _
Key1:=Worksheets("Tabelle2").Range("H22"), Order1:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Worksheets("Tabelle2").Range("F22:L25").Sort _
Key1:=Worksheets("Tabelle2").Range("G22"), Order1:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom


Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige