¿Cómo aplicar el mismo filtro a varias hojas en Excel?
Puede ser fácil para nosotros aplicar la función de filtro para filtrar datos en una hoja de trabajo, pero, a veces, es posible que deba filtrar en varias hojas de trabajo que tienen un formato de datos común con los mismos criterios de filtro. Filtrarlos uno por uno será una pérdida de tiempo, aquí, puedo presentar una forma fácil de resolverlo de una vez.
Aplicar el mismo filtro a varias hojas de trabajo con código VBA
Aplicar el mismo filtro a varias hojas de trabajo con código VBA
Por ejemplo, tengo cuatro hojas de trabajo, ya que la siguiente captura de pantalla debe filtrarse con los mismos criterios que el Producto = KTE a la vez.
No hay una forma directa de filtrar datos en varias hojas en Excel, pero el siguiente código VBA puede ayudarlo a terminar este trabajo, haga lo siguiente:
1. Mantenga pulsado el ALT + F11 llaves, luego abre el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Módulo Ventana.
Código de VBA: aplique el mismo filtro a varias hojas de trabajo:
Sub apply_autofilter_across_worksheets()
'Updateby Extendoffice
Dim xWs As Worksheet
On Error Resume Next
For Each xWs In Worksheets
xWs.Range("A1").AutoFilter 1, "=KTE"
Next
End Sub
3. Y luego presione F5 clave para ejecutar este código, todos los productos de KTE se han filtrado en todas las hojas de trabajo a la vez, vea la captura de pantalla:
Note: Dentro del código anterior, en este xWs.Range ("A1"). Autofiltro 1, "= KTE" guión, A1 y = KTE indica la columna y los criterios sobre los que desea filtrar, el número 1 es el número de columna en el que filtró, puede cambiarlos según sus necesidades. Por ejemplo, si desea filtrar el orden mayor que 50, solo necesita modificar este script como este: xWs.Range ("B1"). Autofiltro 2, "> 50".
Filtrar datos por múltiples criterios u otra condición específica, como por longitud del texto, por mayúsculas y minúsculas, etc.
Kutools for Excel, Súper filtro característica es una poderosa utilidad, puede aplicar esta característica para finalizar las siguientes operaciones:
Kutools for Excel: con más de 300 prácticos complementos de Excel, prueba gratuita y sin límite en 30 días. ¡Descarga y prueba gratis ahora! |
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite 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 de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!