Sortierung von Daten

Forumthread: Sortierung von Daten
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Sortierung von Daten

Daten

Hallo,
ich habe in meinem Sheet "BESTAND" Daten drin. Die möchte ich, bevor sie von Makros verarbeitet werden, mit einem Makro sortieren. Aber nicht einfach nach dem ABC, sondern nach einer von mir vorgegebenen Reichenfolge:
Sortiert werden soll die Spalte C ab Zeile 2:
- Zuerst alle Datensätze, die "Vorlage" beinhalten
- dann alle Datensätze , die "Import" beinhalten
- dann alle Datensätze, die "Export" beinhalten
- dann alle Datensätze, die "Ablage" beinhalten.
Wenn diese Gruppen gebildet sind, soll jeweils die Spalte I innerhalb der Gruppe Aufsteigend sortiert werden. In der Spalte I stehen Geldbeträge drin. So sollte bei der Sortierung innerhalb der Gruppe zB
20,65 Euro hinter (unterhalb) 9,99 Euro stehen.
Wie macht man das per Makro ?
Danke für die Hilfe
Mandy

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: Sortierung von Daten

Daten
Danke, hat funktioniert owT

Mandy

AW: Sortierung von Daten

15.03.2011 12:10:08

Daten

Hallo,
das geht über benutzerdefinierte Listen.

Sub ttt()
Application.AddCustomList ListArray:=Array("Vorlage", "Import", "Export", "Ablage")
Cells.Sort Key1:=Range("C2"), Order1:=xlAscending, _
Key2:=Range("I2"), Order2:=xlAscending, _
Header:=xlYes, OrderCustom:=Application.CustomListCount + 1, _
MatchCase:=False, Orientation:=xlTopToBottom
Application.DeleteCustomList Application.CustomListCount
End Sub

Gruß
Rudi

Danke, hat funktioniert owT

15.03.2011 23:04:45

Mandy