¿Cómo ordenar las pestañas de hojas por color en Excel?
Al trabajar con grandes libros de Excel que contienen varias hojas, asignar colores a las pestañas de las hojas permite categorizarlas y organizarlas visualmente. Sin embargo, Excel no incluye una opción integrada para ordenar automáticamente las pestañas por color. En este artículo, exploraremos dos métodos eficaces para ordenar las pestañas de las hojas por color en Excel.
Ordenar pestañas de hojas por color con código VBA
Ordenar pestañas de hojas por color con Kutools para Excel
Ordenar pestañas de hojas por color con código VBA
Con el siguiente código VBA, podrá ordenar las pestañas por color. Siga estos sencillos pasos:
1. Haga clic en «Desarrollador» > «Visual Basic»; se abrirá una nueva ventana de «Microsoft Visual Basic para Aplicaciones». Haga clic en «Insertar» > «Módulo» e introduzca el siguiente código en el módulo:
VBA: Ordena todas las hojas por color.
Sub SortWorkBookByColor()
'UpdatebyExtendoffice
Dim xArray1() As Long
Dim xArray2() As String
Dim n As Integer
Application.ScreenUpdating = False
If Val(Application.Version) >= 10 Then
For i = 1 To Application.ActiveWorkbook.Worksheets.Count
If Application.ActiveWorkbook.Worksheets(i).Visible = -1 Then
n = n + 1
ReDim Preserve xArray1(1 To n)
ReDim Preserve xArray2(1 To n)
xArray1(n) = Application.ActiveWorkbook.Worksheets(i).Tab.Color
xArray2(n) = Application.ActiveWorkbook.Worksheets(i).Name
End If
Next
For i = 1 To n
For j = i To n
If xArray1(j) < xArray1(i) Then
temp = xArray2(i)
xArray2(i) = xArray2(j)
xArray2(j) = temp
temp = xArray1(i)
xArray1(i) = xArray1(j)
xArray1(j) = temp
End If
Next
Next
For i = n To 1 Step -1
Application.ActiveWorkbook.Worksheets(CStr(xArray2(i))).Move after:=Application.ActiveWorkbook.Worksheets(Application.ActiveWorkbook.Worksheets.Count)
Next
End If
Application.ScreenUpdating = True
End Sub2. A continuación, pulse "F5" o haga clic en el botón «Ejecutar» para ejecutar el código y ordenar automáticamente todas las pestañas de las hojas por color.
 |
 |
 |
Ordenar pestañas de hojas por color con Kutools para Excel
Con Kutools, podrá reordenar rápidamente sus pestañas según su color, ahorrando tiempo y evitando tener que hacerlo manualmente o mediante código VBA. En esta sección, le mostraremos cómo usar Kutools para Excel para ordenar fácilmente las pestañas de las hojas por color.
Si ha instalado Kutools para Excel, puede ordenar las pestañas de las hojas siguiendo estos pasos:
1. Haga clic en «KUTOOLS PLUS» > «Hoja de cálculo» > «Ordenar todas las hojas».
2. En el cuadro de diálogo «Ordenar todas las hojas», haga clic en el botón «Ordenar por color» y observe el nuevo orden de las pestañas en el panel «Después de ordenar».
3. A continuación, haga clic en «Aceptar» para ordenar las pestañas.
Esta función puede reorganizar rápidamente todas las hojas del Libro de Trabajo Actual. Admite varios Tipo de Ordenamiento, como «Orden alfabético», «Orden exacto», «Orden por color» e «Invertir». Además, también puede mover las hojas hacia arriba o hacia abajo y restablecer el orden.
Ordenar las pestañas de las hojas por color en Excel mejora la organización y facilita la navegación en libros de trabajo grandes. Aunque Excel no incluye una opción integrada para hacerlo, este artículo te presenta dos métodos prácticos. Elige el que mejor se adapte a tus necesidades y saca el máximo partido al color de las pestañas en Excel para optimizar tu flujo de trabajo. Si quieres descubrir más consejos y trucos de Excel, nuestra web ofrece miles de tutoriales.
Artículo relacionado:
Ordenar hojas en orden alfabético / alfanumérico en Excel
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos