En este artículo, aprenderá a ordenar automáticamente varias hojas usando el código VBA.

{vacío} P) Me gustaría saber cómo puedo ordenar los datos en varias hojas de trabajo (no todas).

[.underline] # Tomemos un ejemplo: # Tenemos 3 hojas (enero, febrero y marzo) y de ellas solo la hoja de marzo debe clasificarse automáticamente cuando ingrese cualquier información en la columna A.

Haga clic en la pestaña Desarrollador. Desde el grupo Código, seleccione Visual Basic

img1

Ingrese el siguiente código en este Libro de trabajo (no en ninguna hoja). Esto ejecutará el código en todas las hojas de trabajo.

Private Sub Workbook_SheetChange (ByValSh como objeto, ByVal Target como rango)

En caso de error, reanudar siguiente

Seleccione Case ActiveSheet.Name

Caso «Jan», «Feb»

Caso demás

Si no se cruza (objetivo, rango («A: A»)) no es nada, entonces

Rango («A1»). Ordenar clave1: = Rango («A2»), _

Orden1: = xlAscendente, Encabezado: = xlYes, _

OrderCustom: = 1, MatchCase: = False, _

Orientación: = xlTopToBottom

Finalizar si

Seleccionar fin

End Sub

img2

De esta manera, puede ordenar fácilmente los datos por cualquier columna específica en varias hojas mientras escribe la información. Esta es una excelente manera de ahorrar tiempo y asegurarse de que el informe se vea como le gustaría ver.