¿Cómo ordenar datos en varias hojas de cálculo a la vez?

En Excel, podemos ordenar datos en una hoja de cálculo basándonos en una columna específica de forma rápida y sencilla, pero, ¿has intentado alguna vez ordenar los datos en múltiples hojas de cálculo? Ordenarlas una por una sería muy laborioso. En este artículo, te presentaré una manera fácil de resolverlo.

Ordenar datos en múltiples hojas de cálculo a la vez con código VBA

Ordenar datos en múltiples hojas de cálculo a la vez con código VBA

Para ordenar datos basados en una columna en todas las hojas de tu libro de trabajo, el siguiente código VBA puede ayudarte.

1. Mantén presionadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic for Applications.

2. Haz clic en Insertar > Módulo, y pega el siguiente código en la Ventana del Módulo.

Código VBA: Ordenar datos en múltiples hojas de cálculo a la vez:

Sub SortAllSheets()
   'Updateby Extendoffice
   Dim WS      As Worksheet
   ActiveSheet.Range("a1:f1").Select
   Selection.Copy
   On Error Resume Next
   Application.ScreenUpdating = False
   For Each WS In Worksheets
      WS.Columns("A:F").Sort Key1:=WS.Columns("E"), Order1:=xlDescending
   Next WS
   ActiveSheet.Range("A1").PasteSpecial Paste:=xlPasteAll
   Application.ScreenUpdating = True
End Sub

3. Luego presiona la tecla F5 para ejecutar este código; todas las hojas que tienen el mismo formato se han ordenado de una vez basándose en la columna E de cada hoja en orden descendente.

Nota: En el código anterior, A:F es el rango de datos que deseas ordenar, y E es la letra de la columna en la que deseas basar la ordenación.

Descubre la Magia de Excel con Kutools AI

• Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
• Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
• Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
• Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
• Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.

Potencia tus capacidades de Excel con herramientas impulsadas por IA. ¡Descarga Ahora y experimenta una eficiencia como nunca antes!