Sortering flikar alfabetiskt med Visual Basic for Applications ( VBA ) i Excel är inte så svårt som du kanske tror . I VBA kan du använda " Worksheet.Move " metoden för att flytta en plåt till en annan plats i arbetsboken . Du kan ange namn och ordning på dina skivor i en array och loopa igenom arrayen för att flytta sortera tabellflikarna . Denna metod är mycket användbar när du behöver sortera igenom många blad i en arbetsbok . Instruktioner
1
Klicka på " Utvecklare " fliken och klicka på " Visual Basic " för att öppna Microsoft Visual Basic Editor . Klicka på " Infoga " -menyn och klicka på " modul " för att lägga till en ny modul
2
Börja med att skapa en ny sub förfarande och lägga till följande VBA-kod : .
Sub sortSheetsAlphabetically ( ) Addera 3
Skapa två variabler genom att skriva följande kod :
Dim shtNamesArray As Variant
Dim shtCntr As Long
4
Definiera arrayen genom att lägga arket namnen i den ordning du föredrar genom att lägga till följande kodrad :
shtNamesArray = Array ( " aSheet " , " bSheet " , " cSheet " ) katalog
5
Skapa en slinga för att sortera bladen i den ordning som anges i arrayen genom att lägga till följande kod :
för shtCntr = UBound ( shtNamesArray ) till LBound ( shtNamesArray ) Step -1
.
kalkylblad ( shtNamesArray ( shtCntr ) ) Flytta Före : " . End Sub " = Arbetsblad ( 1 ) katalog
Nästa shtCntr
6
avsluta proceduren genom att skriva Tryck " F5 " för att köra den och sortera flikarna .
