ort-Methode (Excel) | Microsoft Docs
Weiter zum Hauptinhalt
Dieser Browser wird nicht mehr unterstützt. Führen Sie ein Upgrade auf Microsoft Edge durch, um die neuesten Features, Sicherheitsupdates und den technischen Support zu nutzen. Artikel
04/06/2022
2 Minuten Lesedauer
Ist diese Seite hilfreich? Haben Sie weiteres Feedback für uns? Feedback wird an Microsoft gesendet: Wenn Sie auf die Sendeschaltfläche klicken, wird Ihr Feedback verwendet, um Microsoft-Produkte und -Dienste zu verbessern. Datenschutzrichtlinie
Vielen Dank. In diesem Artikel
Legt automatische Regeln für die Sortierung von Feldern in PivotTable-Berichten fest. Syntax
ausdruck. AutoSort ( Reihenfolge, Feld, PivotLine, CustomSubtotal)
Ausdruck Eine Variable, die ein PivotField-Objekt darstellt. Parameter
Name
Erforderlich/Optional
Datentyp
Beschreibung
Order
Erforderlich
Long
Eine der XlSortOrder -Konstanten, die die Sortierreihenfolge angibt. VBA: Spalte sortieren - ein einfaches Problem. Field
String
Der Name des Sortierschlüsselfelds. Sie müssen den eindeutigen Namen (wie von der SourceName-Eigenschaft zurückgegeben) und nicht den angezeigten Namen angeben.
Excel Makro Sortieren Aufsteigend English
Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung:
Excel Makro Sortieren Aufsteigend Gratis
Dieser VBA-Code sortiert die Tabellenblätter einer Arbeitsmappe in alphabetischer Reihenfolge wahlweise aufsteigend oder absteigend. Excel makro sortieren aufsteigend. Um die Sortierreihenfolge zu ändern müssen Sie nur die Variable strSortKrit anpassen und entweder den Parameter ">" oder "<" übergeben. Der Parameter ">" sortiert die Blätter absteigend, also von Z-A und von 9-0
Der Parameter "<" sortiert die Bläter aufsteigend von 0-9 und von A-Z
Sub Sheets_alphabetisch_sortieren()
'** Dieses Makro sortiert die Blätter in alphabetischer Reihenfolge
'** Reihenfolge: Sonderzeichen, Ziffern, Buchstaben
'** Dimensionierung der Variablen
Dim intAnz As Integer
Dim a, b As Integer
Dim strSortKrit As String
'** Sortierreihenfolge festlegen
'** "<" = Aufsteigend von 0-9 und A-Z
'** ">" = Absteigend von Z-A und 9-0
strSortKrit = ">" 'Nach Bedarf anpassen! '** Ermittlung Anzahl Tabellenblätter
intAnz =
'** Blätter nacheinander durchlaufen und sortieren
For a = 1 To intAnz
For b = a To intAnz
If strSortKrit = "<" Then
If Worksheets(b) < Worksheets(a) Then
Worksheets(b) Before:=Worksheets(a)
End If
ElseIf strSortKrit = ">" Then
If Worksheets(b) > Worksheets(a) Then
Next b
Next a
End Sub
Drucken
E-Mail
Betrifft: Im falschen Beitrag gepostet. 2017 14:06:40
Excel-Beispiele zum Thema "VBA: Spalte sortieren - ein einfaches Problem"
Vorkommen von Zahlenreihen in Spalten
Funktion ANZAHL2 ohne ausgeblendete Spalten
Spaltenbreite anpassen
Spalten einer Mehrbereichsauswahl ausblenden.