Vba: so sortieren sie ein blatt nach mehreren spalten
Sie können die folgende grundlegende Syntax verwenden, um eine Excel-Tabelle mithilfe von VBA nach mehreren Spalten zu sortieren:
Sub SortMultipleColumns()
Range(" A1:B11 ").Sort Key1:=Range(" A1 "), Order1:=xlAscending, _
Key2:=Range(" B1 "), Order2:=xlDescending, _
Header:=xlYes
End Sub
In diesem speziellen Beispiel werden die Zellen im Bereich A1:B11 zuerst nach den Werten in Spalte A in aufsteigender Reihenfolge und dann nach den Werten in Spalte B in absteigender Reihenfolge sortiert.
Beachten Sie, dass Header:=xlYes angibt, dass die erste Zeile als Kopfzeile behandelt werden soll.
Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.
Beispiel: Sortieren einer Excel-Tabelle nach mehreren Spalten mithilfe von VBA
Nehmen wir an, wir haben den folgenden Datensatz in Excel, der Informationen über verschiedene Basketballspieler enthält:
Angenommen, wir möchten den Datensatz wie folgt sortieren:
- Sortieren Sie zunächst nach den Werten in der Spalte „Team“ in aufsteigender Reihenfolge (A bis Z).
- Sortieren Sie als Nächstes nach den Werten in der Spalte „Punkte“ in absteigender Reihenfolge (vom größten zum kleinsten).
Dazu können wir das folgende Makro erstellen:
Sub SortMultipleColumns()
Range(" A1:B11 ").Sort Key1:=Range(" A1 "), Order1:=xlAscending, _
Key2:=Range(" B1 "), Order2:=xlDescending, _
Header:=xlYes
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Die Zeilen werden jetzt nach Teamnamen in aufsteigender Reihenfolge und nach Punkten in absteigender Reihenfolge sortiert.
Hinweis Nr. 1 : In diesem Beispiel haben wir nach zwei Spalten sortiert. Sie können jedoch beliebig viele Schlüssel angeben, um noch mehr Spalten zu sortieren.
Hinweis Nr. 2 : Die vollständige Dokumentation der VBA- Sortiermethode finden Sie hier .
Zusätzliche Ressourcen
In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:
VBA: So schreiben Sie die Funktionen AVERAGEIF und AVERAGEIFS
VBA: So schreiben Sie SUMIF- und SUMIFS-Funktionen
VBA: So schreiben Sie COUNTIF- und COUNTIFS-Funktionen