Sortierung alphabetisch Registerkarten mit Visual Basic für Applikationen ( VBA) in Excel ist nicht so schwierig, wie Sie vielleicht denken. In VBA können Sie die " Worksheet.Move "-Methode , um ein Blatt zu einem anderen Ort in der Arbeitsmappe zu verschieben. Sie können den Namen und die Reihenfolge der Blätter in einem Array und eine Schleife durch das Array zu definieren, um die Art Blattregisterkarten bewegen . Diese Methode ist sehr nützlich, wenn Sie durch viele Blätter in einer Arbeitsmappe sortieren müssen . Anleitung
1
Klicken Sie auf die Registerkarte "Entwicklertools" und klicken Sie auf " Visual Basic ", um den Microsoft Visual Basic -Editor zu öffnen . Klicken Sie auf das Menü "Einfügen" und klicken Sie auf "Module" ein neues Modul hinzufügen
2
starten , indem eine neue Sub-Prozedur und fügen Sie die folgende VBA-Code : .
Sub sortSheetsAlphabetically ( )
3
Create zwei Variablen , indem Sie den folgenden Code: Dim
shtNamesArray As Variant Dim
shtCntr As Long
4
definieren das Array , indem die Folie Namen in der von Ihnen gewünschten Reihenfolge , indem Sie die folgende Codezeile :
shtNamesArray = Array (" aSheet ", " bSheet ", " cSheet " )
5
erstellen eine Schleife , um die Blätter in der Reihenfolge, in der Anordnung , indem Sie den folgenden Code definiert sortieren:
shtCntr = UBound ( shtNamesArray ) Zu LBound ( shtNamesArray ) Step -1
.
Worksheets ( shtNamesArray ( shtCntr )) Vor Verschieben: " . End Sub " = Worksheets ( 1) german
Weiter shtCntr
6
Beenden Sie den Vorgang , indem Sie Drücken Sie auf " F5" , um es auszuführen und sortieren Sie die Registerkarten .