Mientras trabajaba con Microsoft Excel filtrar datos nos permite ver sólo la información que deseamos. Siempre que queramos concentrarnos en determinados elementos de un gran conjunto de datos o tablas, esta técnica nos resultará muy útil. Una vez terminado el trabajo, necesitaremos de nuevo esos datos en nuestra hoja de cálculo. Aunque Excel ya dispone de una herramienta para ello, pero VBA En este artículo, vamos a algunos ejemplos para eliminar el filtro en Excel VBA.

Descargar el cuaderno de prácticas

Puedes descargarte el cuaderno de ejercicios y practicar con ellos.

5 métodos simples para eliminar el filtro en Excel VBA

Excel dispone de herramientas y funciones integradas para eliminar los filtros de los datos, pero con Excel VBA podemos eliminar rápidamente esos filtros simplemente ejecutando la función VBA Para eliminar los filtros de los datos vamos a utilizar el siguiente conjunto de datos, que contiene algunos ID de producto en la columna B nombres de productos en la columna C y el país de entrega en la columna D Como sólo queremos ver los detalles del producto... Champú y Acondicionador por lo que los filtramos. Ahora, supongamos que necesitamos borrar esos datos filtrados. Para ello utilizaremos unos Macros VBA de Excel para ello. Vamos a demostrar los ejemplos para borrar esos filtros de los datos utilizando Excel VBA .

1. Aplicar VBA para eliminar todos los filtros de la tabla de Excel

Con Excel VBA los usuarios pueden utilizar fácilmente el código que actúa como menús de Excel desde la cinta de opciones. Para utilizar el código VBA para eliminar todos los filtros de la tabla de Excel, sigamos los pasos que se indican a continuación.

PASOS:

• En primer lugar, vaya a la página Desarrollador de la cinta de opciones.
• En segundo lugar, desde el Código haga clic en Visual Basic para abrir el Editor de Visual Basic O pulse Alt + F11 para abrir el Editor de Visual Basic .

• En lugar de hacer esto, puede hacer clic con el botón derecho del ratón en la hoja de cálculo e ir a Ver Código Esto también le llevará a Editor de Visual Basic .

• Aparecerá en el Editor de Visual Basic donde escribimos nuestros códigos para crear una tabla a partir de un rango.
• En tercer lugar, haga clic en Módulo del Inserte barra de menú desplegable.

• Esto creará un Módulo en tu cuaderno de trabajo.
• Y, copia y pega el VBA que se muestra a continuación.

Código VBA:

 Sub Remove_Filters1() Dim lstObj As ListObject Set lstObj = Sheet1.ListObjects(1) lstObj.AutoFilter.ShowAllData End Sub 

• A continuación, ejecute el código pulsando el botón RubSub o pulsando el atajo de teclado F5 .

• Y, por último, siguiendo los pasos se eliminarán todos los filtros de la tabla excel de tu hoja de cálculo.

Explicación del código VBA

 Sub Eliminar_Filtros1() 

Sub es una parte del código que se utiliza para manejar el trabajo en el código, pero no devolverá ningún valor. También se conoce como subprocedimiento. Así que llamamos a nuestro procedimiento Eliminar_Filtros1() .

 Dim lstObj As ListObject 

Declaración de variables.

 Set lstObj = Hoja1.ListObjects(1) 

VBA Set simplemente nos permite evitar tener que escribir el rango que necesitamos escoger una y otra vez al ejecutar el código. Así, establecemos la referencia a la primera tabla de la hoja.

 lstObj.AutoFiltro.MostrarTodosDatos 

Esta línea de código eliminará todos los filtros de todos los datos.

 Fin Sub 

Esto finalizará el procedimiento.

Más información: Cómo quitar el filtro en Excel (5 Easy & Maneras rápidas)

2. Borrar Todos los Filtros de Tabla de Excel en una Hoja Usando VBA

Veamos otro ejemplo de utilización de Excel VBA para eliminar todos los filtros de tabla de Excel en una hoja. Para ello, siga los pasos que se indican a continuación.

PASOS:

• En primer lugar, vaya a la página Desarrolle r de la cinta de opciones.
• En segundo lugar, haga clic en Visual Basic para abrir el Editor de Visual Basic .
• Otra forma de abrir el Editor de Visual Basic es simplemente pulsar Alt + F11 .
• O bien, haga clic con el botón derecho del ratón en la hoja y seleccione Ver Código .
• A continuación, vaya a Inserte y seleccione Módulo en el menú desplegable.
• Y, esto abrirá la ventana de visual basic.
• A continuación, copie y pegue el archivo Código VBA abajo.

Código VBA:

 Sub Remove_Filters2() Dim lstObj As ListObject For Each lstObj In Sheet2.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj End Sub 

• Además, pulse la tecla Tecla F5 o haga clic en el botón Ejecutar Sub para ejecutar el código.

• Y, este código borrará todos los filtros de tabla de Excel de su hoja y dar la salida como Método 1 .

Explicación del código VBA

 For Each lstObj In Sheet2.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj 

Estas líneas de código recorren todas las tablas de la hoja y eliminan todos los filtros de toda la hoja de cálculo.

Más información: Cómo filtrar una tabla dinámica de Excel (8 formas efectivas)

3. Eliminar filtro de una columna con VBA en Excel

Echemos un vistazo a otra forma de borrar el filtro de una columna con Excel VBA. Veamos el procedimiento para ello.

PASOS:

• Para empezar, pulse el botón Desarrollador de la cinta de opciones.
• En segundo lugar, inicie el Editor de Visual Basic haciendo clic en Visual Basic .
• También puede acceder a Editor de Visual Basic pulsando Alt + F11 .
• O, haga clic con el botón derecho del ratón en en la hoja y seleccione Ver Código del menú.
• A continuación, elija el Módulo en el cuadro desplegable Inserte .
• Y aparecerá la ventana de Visual Basic.
• Escriba el código allí.

Código VBA:

 Sub Remove_Filter3() Hoja1.Rango("B3:D16").AutoFiltro Campo:=4 End Sub 

• Por último, pulse la tecla Tecla F5 para ejecutar el código.

• Usando este código eliminará el filtro de una columna de su tabla excel.

Explicación del código VBA

 Hoja1.Rango("B3:D16").AutoFiltro Campo:=4 

Esta línea de código sólo especifica el número de campo y ningún otro parámetro.

Más información: Excel VBA para Filtrar en la Misma Columna por Múltiples Criterios (6 Ejemplos)

Lecturas similares

• Excel VBA: Cómo Filtrar con Múltiples Criterios en una Matriz (7 Maneras)
• Código VBA para Filtrar Datos por Fecha en Excel (4 Ejemplos)
• Cómo Usar Filtro en Hoja Excel Protegida (Con Pasos Fáciles)
• Filtrar diferentes columnas por criterios múltiples en Excel VBA
• Código VBA para Filtrar Datos en Excel (8 Ejemplos)

4. Borrar todos los filtros de una hoja de cálculo activa

Ahora, eche un vistazo a otro Excel VBA para borrar todos los filtros de una hoja de cálculo activa. Sigamos los pasos a continuación.

PASOS:

• Para empezar, abra la cinta de opciones y seleccione la opción Desarrollador opción.
• A continuación, para acceder al Editor de Visual Basic haga clic en Visual Basic .
• Pulsando Alt + F11 también mostrará Editor de Visual Basic .
• Alternativamente, haga clic con el botón derecho del ratón en la hoja y seleccione Ver Código en el menú que aparece.
• Ahora, desde el Inserte seleccione Módulo .
• A continuación, copie y pegue el VBA código que sigue.

Código VBA:

 Public Sub RemoveFilter() If ActiveSheet.FilterMode = True Then ActiveSheet.ShowAllData End If End Sub 

• Ejecute el código pulsando la tecla F5 llave.

• Y, por último, podrá eliminar los filtros de sus datos utilizando esta función VBA código como Método 1 .

Read More: Cómo Filtrar por Lista en Otra Hoja en Excel (2 Métodos)

5. Excel VBA para eliminar todos los filtros de un libro de trabajo

Exploremos otra r Excel VBA manera de eliminar todos los filtros de un libro de trabajo. Por lo tanto, vamos a ver los pasos hacia abajo.

PASOS:

• Para empezar, abra la cinta y seleccione Desarrollador en el menú desplegable.
• A continuación, seleccione Visual Basic para abrir el Editor de Visual Basic .
• En Editor de Visual Basic también se puede acceder pulsando Alt + F11 .
• También puede haga clic con el botón derecho del ratón en la hoja y seleccione Ver Código en el menú emergente.
• A continuación, seleccione Módulo del Inserte menú desplegable.
• A continuación, copie y pegue el siguiente código VBA.

Código VBA:

 Sub Remove_Filters_From_Workbook() Dim shtnam As Worksheet Dim lstObj As ListObject For Each shtnam In Worksheets For Each lstObj In shtnam.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj Next shtnam End Sub 

• Por último, ejecute el código pulsando F5 en el teclado y verás el resultado en tu hoja de cálculo.

• Este VBA borrará todos los filtros de todo el libro como se muestra en la imagen primer Método .

Explicación del código VBA

 For Each shtnam In Worksheets For Each lstObj In shtnam.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj Next shtnam 

El primer bucle es para recorrer todas las tablas del libro de trabajo. El segundo bucle es para recorrer todas las tablas de la hoja de cálculo. A continuación, la línea dentro del bucle sólo borra el filtro de la tabla. Después, cierra el bucle con las dos últimas líneas.

Más información: Atajo para Filtro Excel (3 Usos Rápidos con Ejemplos)

Conclusión

Los métodos anteriores le ayudarán a Eliminar filtro en Excel VBA Si tiene alguna pregunta, sugerencia o comentario, no dude en hacérnoslo saber en la sección de comentarios. También puede echar un vistazo a otros artículos de la sección ExcelWIKI.com ¡blog!