Come ordinare le schede in ordine alfabetico con VBA in Excel

March 30

Come ordinare le schede in ordine alfabetico con VBA in Excel


Ordinamento schede in ordine alfabetico con Visual Basic, Applications Edition (VBA) in Excel non è così difficile come si potrebbe pensare. In VBA è possibile utilizzare il metodo "Worksheet.Move" per spostare un foglio in un'altra posizione nella cartella di lavoro. È possibile definire il nome e l'ordine dei fogli in un array e ciclo attraverso l'array di spostare tipo le schede dei fogli. Questo metodo è estremamente utile quando è necessario ordinare attraverso molti fogli in una cartella di lavoro.

istruzione

1 Fare clic sulla scheda "Sviluppatore" e fare clic su "Visual Basic" per aprire il Microsoft Visual Basic Editor. Fare 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")

5 Creare un ciclo per ordinare i fogli nell'ordine definito nella matrice aggiungendo il codice seguente:

Per shtCntr = UBound (shtNamesArray) Per LBound (shtNamesArray) Passo -1

Worksheets(shtNamesArray(shtCntr)).Move Before:=Worksheets(1)

Successivo shtCntr

6 Terminare la procedura digitando "End Sub". Premere il tasto "F5" per eseguirlo e ordinare le schede.