Fare clic sulla scheda "Sviluppatore " e cliccare su " Visual Basic " per aprire il Microsoft Visual Basic Editor . Fai clic sul menu "Inserisci" e fare clic su "Modulo " per aggiungere un nuovo modulo
2
Inizia con la creazione di una nuova procedura di sub e aggiungendo il seguente codice VBA : .
Sub sortSheetsAlphabetically ( )
3
Creare due variabili digitando il seguente codice : Dim
shtNamesArray As Variant
Dim shtCntr As Long
4
Definire l' array aggiungendo i nomi dei fogli nell'ordine che preferite , aggiungendo la seguente riga di codice :
shtNamesArray = Array ( " aSheet " , " bSheet " , " cSheet " ) per
5
creare un ciclo per ordinare i fogli nell'ordine definito nella matrice aggiungendo il seguente codice :
shtCntr = UBound ( shtNamesArray ) a LBound ( shtNamesArray ) Passo -1
. fogli di lavoro ( shtNamesArray ( shtCntr ) ) mossa prima : = Worksheets ( 1 ) per
Successivo shtCntr
6
completare la procedura digitando "End Sub ". Premere il tasto " F5 " per eseguirlo e ordinare le schede.
software © www.354353.com