So sortieren Sie Arbeitsblatt-Registerkarten in alphabetischer Reihenfolge in Excel

Wenn sich in Ihrer Excel-Arbeitsmappe eine große Anzahl von Arbeitsblättern befindet, kann es schwierig sein, ein bestimmtes Arbeitsblatt zu finden. Wenn Sie Ihre Arbeitsblatt-Registerkarten alphabetisch sortieren, können Sie leichter finden, wonach Sie suchen.

Sie können Ihre Arbeitsblatt-Registerkarten nicht nur durch das Anwenden von Farben organisieren, Sie können sie auch alphabetisch oder alphanumerisch sortieren, sofern Sie Ihren Arbeitsblättern benutzerdefinierte Namen zugewiesen haben. Leider ist das alphabetische Sortieren von Arbeitsblatt-Registerkarten nicht in Excel integriert. Sie können jedoch Ihrer Arbeitsmappe ein Makro hinzufügen, mit dem Sie Ihre Registerkarten in auf- oder absteigender Reihenfolge sortieren können. Wir zeigen Ihnen, wie Sie ein Makro, das auf der Support-Site von Microsoft verfügbar ist, zu Ihrer Excel-Arbeitsmappe hinzufügen, mit der Ihre Arbeitsblatt-Registerkarten sortiert werden.

Um zu beginnen, drücken Sie Alt + F11, um den VBA-Editor (Microsoft Visual Basic für Applikationen) zu öffnen. Gehen Sie dann zu Einfügen> Modul.

Kopieren Sie das folgende Makro von Microsoft in das angezeigte Modulfenster.

Sub Sort_Active_Book () Dim i As Integer Dim J As Integer Dim iAnswer As VbMsgBoxResult "Fordern Sie den Benutzer auf, in welche Richtung er die Arbeitsblätter sortieren möchte." IAnswer = MsgBox ("Sortieren von Blättern in aufsteigender Reihenfolge?" & Chr (10) _ & "Durch Klicken auf Nein wird in absteigender Reihenfolge sortiert", _ vbYesNoCancel + vbQuestion + vbDefaultButton1, "Arbeitsblätter sortieren") Für i = 1 bis Sheets.Count Für j = 1 bis Sheets.Count - 1 "Wenn die Antwort Ja ist, dann sortieren in aufsteigender Reihenfolge. 'Wenn iAnswer = vbYes, dann wenn UCase $ (Sheets (j) .Name)> UCase $ (Sheets (j + 1) .Name) Dann Sheets (j) .Move After: = Sheets (j + 1) End If "If Die Antwort lautet Nein und dann in absteigender Reihenfolge sortieren. ElseIf iAnswer = vbNo Then If UCase $ (Sheets (j) .Name) < UCase$(Sheets(j + 1).Name) Then                Sheets(j).Move After:=Sheets(j + 1)             End If          End If       Next j    Next i End Sub

Der VBA-Editor benennt jedes Modul automatisch mit einer Nummer am Ende, wie z. B. Module1, Module2 usw. Sie können einfach den Standardnamen des Moduls akzeptieren. Wenn Sie jedoch weitere Makros zu Ihrer Arbeitsmappe hinzufügen möchten, empfiehlt es sich, jedes Modul umzubenennen, damit Sie wissen, was es ist. Wir werden unser Modul umbenennen, um Ihnen zu zeigen, wie es geht.

Um das Modul umzubenennen, wählen Sie den Text im Feld Name für das Modul unter Eigenschaften im linken Bereich aus.

Geben Sie im Feld Name einen Namen für das Modul ein und drücken Sie die Eingabetaste. Beachten Sie, dass der Modulname keine Leerzeichen enthalten darf.

Der Name des Moduls ändert sich in der Liste der Module unter Projekt im linken Bereich.

Schließen Sie den VBA-Editor, indem Sie auf Datei> Schließen klicken und zu Microsoft Excel zurückkehren.

Jetzt führen wir das Makro aus, um unsere Tabs zu sortieren. Drücken Sie Alt + F8, um auf die Liste der Makros im Dialogfeld "Makro" zuzugreifen. Wählen Sie das Makro in der Liste aus (in unserem Fall gibt es nur ein Makro) und klicken Sie auf "Ausführen"..

Das folgende Dialogfeld wird angezeigt, in dem Sie auswählen können, ob Sie Ihre Arbeitsblätter in aufsteigender oder absteigender Reihenfolge sortieren möchten. Wir möchten sie in aufsteigender Reihenfolge sortieren und klicken auf "Ja"..

Die Arbeitsblatt-Registerkarten sind jetzt in alphabetischer Reihenfolge angeordnet.

Das Makro, das Sie hinzugefügt haben, ist jetzt Teil Ihrer Arbeitsmappe. Wenn Sie es jedoch speichern, wird wahrscheinlich das folgende Dialogfeld angezeigt. Das liegt daran, dass Sie Ihre Arbeitsmappe als XLSX-Datei gespeichert haben. Dies ist ein normales Excel-Arbeitsmappenformat, das keine Makros enthält. Um Makros in Ihre Arbeitsmappe aufzunehmen und ausführen zu können, müssen Sie Ihre Arbeitsmappe als Makro-aktivierte Arbeitsmappe oder als XLSM-Datei speichern. Klicken Sie dazu in diesem Dialogfeld auf "Nein".

Das Dialogfeld Speichern unter wird angezeigt. Navigieren Sie zu dem Ort, an dem Sie die makroaktivierte Arbeitsmappe speichern möchten, wenn Sie sich noch nicht in diesem Ordner befinden. Wählen Sie in der Dropdown-Liste "Dateityp" die Option "Excel-aktivierte Arbeitsmappe (* .xlsm)" aus.

Klicken Sie auf "Speichern"..

Wenn Sie die Arbeitsmappe nicht als makroaktivierte Arbeitsmappe (XLSM-Datei) speichern, wird das hinzugefügte Makro gelöscht. Möglicherweise möchten Sie die .xlsx-Version Ihrer Arbeitsmappe löschen, damit Sie nicht vergessen, die .xlsm-Version Ihrer Arbeitsmappe zu verwenden, wenn Sie weitere Arbeitsblatt-Registerkarten hinzufügen und sie mit dem Makro erneut sortieren möchten. Sie können die Arbeitsmappe immer wieder als .xlsx-Datei speichern, wenn Sie keine Makros mehr verwenden möchten.