¿Cómo aplicar filtros a varias hojas?
Quisiera saber si puedes por favor ayudarme con una macro que me ayude a filtrar por elementos en la primera hoja y este filtro se replique en las hojas adyacentes, en la imagen que adjunto, tengo la misma cantidad de filas y columnas, pero al ser varios puntos de venta, en cada hoja tengo cada uno.
Hoy mi jefe me pregunto, filtra por por referencia y que ese mismo filtro se aplique a las demás hojas, así mismo que cuando lo quites, se quite en las demás hojas.
Revisando uno de los foros encontré que aplicaste esta macro, pero esta macro solo aplica el filtro a un solo nombre, ¿qué pasa si quiero que filtre por más de 10 nombres?, ¿Cómo quedaría la macro para que se restablezca todo a visualizar sin filtros?
Sub filtrar() 'Por.Dante Amor Set h2 = Sheets("Hoja2") Set h3 = Sheets("Hoja3") h2.ListObjects("Tabla2").Range.AutoFilter Field:=1, Criteria1:=h2.[A2] h3.ListObjects("Tabla3").Range.AutoFilter Field:=1, Criteria1:=h2.[A2] End Sub
Agradezco tu ayuda.
Respuesta de Adriel Ortiz Mangia
1