Tecnología

Inicio

Cómo ordenar aquí alfabéticamente con VBA en Excel

Cómo ordenar aquí alfabéticamente con VBA en Excel


Ordenando pestañas alfabéticamente con Visual Basic para Aplicaciones (VBA) en Excel no es tan difícil como usted puede pensar. En VBA se puede utilizar el método de "Worksheet.Move" para mover una hoja a otra ubicación en el libro. Se puede definir el nombre y el orden de las hojas en una matriz y recorrer la matriz para mover ordenar las fichas de hoja. Este método es muy útil cuando se necesita para ordenar a través de muchas hojas de un libro.

Instrucciones

1 Haga clic en la pestaña "desarrolladores" y haga clic en "Visual Basic" para abrir el Editor de Microsoft Visual Basic. Haga clic en el menú "Insertar" y haga clic en "Módulo" para añadir un nuevo módulo.

2 Comience por crear un nuevo procedimiento sub y añadiendo el siguiente código VBA:

Sub sortSheetsAlphabetically ()

3 Crear dos variables escribiendo el siguiente código:

Dim shtNamesArray como variante

Dim shtCntr As Long

4 Definir la matriz mediante la adición de los nombres de las hojas en el orden que prefiera añadiendo la siguiente línea de código:

shtNamesArray = Array ( "aSheet", "bSheet", "cSheet")

5 Crear un bucle para ordenar las hojas en el orden definido en la matriz añadiendo el código siguiente:

Para shtCntr = UBound (shtNamesArray) Para LBound (shtNamesArray) -1 Paso

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

Siguiente shtCntr

6 Finalizar el proceso escribiendo "End Sub". Pulse la tecla "F5" para ejecutar y ordenar las pestañas.