Quitar los filtros en VBA

En esta oportunidad, se presentará como quitar o limpiar los filtros cuando se tiene una gran base de datos y deseas tener disponible todos los datos para su posterior análisis. Cabe destacar que un filtro sirve para limitar las tablas a mostrar de un número determinado de filas en una tabla, sin embargo, la acción que desarrollaremos sirve para deshacer dicha clasificación. El procedimiento es el siguiente:

Primero, al tener una base de datos con tablas, como la anterior, se observa que el filtro sirvió para seleccionar solo los productos a base de Cobia. De tal forma que se muestra solo 54 de 1477 filas.

Por lo tanto, si queremos que nuestra macro muestre todos los productos y limpie de todos los filtros, la fórmula a usar será la siguiente:

Sub LimpiarFiltro()

If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData

End Sub

De esta forma ya tenemos todos los productos disponibles.

En otro ejemplo, veremos el caso más extremo cuando solo notamos una fila del total de fórmulas pero queremos que sea vean todos los detalle.

En este caso, se observa que hay muchas filas obviadas por el filtro, por lo que utilizando la misma fórmula:

Por lo tanto, luego de aplicar la fórmula, se obtiene todas las filas visibles:

De esta forma, se logra demostrar la gran utilidad de quitar filtros en grandes bases de datos con tablas dinámicas.

Por: David Javier Zegarra