Sortering faner alfabetisk med Visual Basic for Applications ( VBA ) i Excel er ikke så svært som du måske tror. I VBA kan du bruge " Worksheet.Move " metode til at flytte et ark til et andet sted i projektmappen. Du kan definere navn og rækkefølgen af dine plader i et array og loop gennem array til at flytte sortere arkfanerne . Denne metode er yderst nyttigt , når du skal til at sortere gennem mange ark i en projektmappe. Instruktioner
1
Klik på " Udvikler " fanen og klik på " Visual Basic " for at åbne Microsoft Visual Basic Editor. Klik på " Indsæt" menuen og klikke på " Modul " for at tilføje et nyt modul
2
Start med at oprette en ny sub procedure og tilføje følgende VBA-kode : .
Sub sortSheetsAlphabetically ( )
3
Opret to variabler ved at skrive følgende kode : Hej
Dim shtNamesArray Som Variant
Dim shtCntr As Long
4
Definer array ved at tilføje arknavne i den rækkefølge , du foretrækker ved at tilføje følgende linje kode : Hej
shtNamesArray = Array ( " aSheet ", " bSheet ", " cSheet " )
< br > 5
Opret en løkke til at sortere arkene i den rækkefølge er defineret i array ved at tilføje følgende kode : Hej
shtCntr = UBound ( shtNamesArray ) At LBound ( shtNamesArray ) Step -1
.
regneark ( shtNamesArray ( shtCntr ) ) Flyt Før: " . End Sub " = regneark (1)
Næste shtCntr
6
Afslut proceduren ved at skrive Tryk på " F5 " for at køre den og sortere fanerne.