¿Cómo eliminar los filtros al abrir, guardar o cerrar un libro de trabajo en Excel?
Supongamos que tiene varias hojas de cálculo con datos filtrados en su libro de trabajo. Para eliminar todos los filtros, tendría que revisar la lista filtrada en cada hoja y quitarlos manualmente, uno por uno… ¡una tarea realmente tediosa! En este artículo, le mostraremos varios métodos para borrar automáticamente los filtros al abrir, guardar o cerrar un libro de trabajo en Excel.
Borrar los filtros al abrir el libro de trabajo en Excel
Borrar los filtros al guardar el libro de trabajo en Excel
Borrar los filtros al cerrar/salir del libro de trabajo en Excel
Borrar los filtros al abrir el libro de trabajo en Excel
Esta sección explica cómo eliminar los filtros de todas las hojas de cálculo al abrir un libro de trabajo. Siga estos sencillos pasos.
1. En un libro de trabajo en el que necesite borrar automáticamente todos los filtros al abrirlo, pulse las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En la ventana de Microsoft Visual Basic para Aplicaciones, haga doble clic en EsteLibro en el panel izquierdo Proyecto y, a continuación, copie y pegue el siguiente código VBA en la ventana de EsteLibro (Código). Vea la captura de pantalla:
Código VBA: Borrar todos los filtros al abrir el libro de trabajo
Private Sub Workbook_Open()
'Updated by Extendoffice 20221012
Dim ws As Worksheet
For Each ws In Worksheets
If ws.AutoFilterMode Then
ws.ShowAllData
End If
Next ws
End Sub3. Pulse las teclas Alt + Q para salir de la ventana de Microsoft Visual Basic para Aplicaciones.
4. Haga clic en Archivo > Guardar como. En el cuadro de diálogo Guardar como que aparece, especifique una carpeta para guardar este libro de trabajo, asígnele el nombre que desee en el cuadro Nombre de archivo, seleccione la opción Libro de Excel habilitado para macros en el menú desplegable Especificar formato de guardado y, finalmente, haga clic en el botón Guardar.
A partir de ahora, al abrir este libro de Excel habilitado para macros, todos los filtros del libro se eliminarán automáticamente.
Descubra la magia de Excel con KUTOOLS AI
- Ejecución inteligente: Realice operaciones en celdas, analice datos y cree gráficos con comandos sencillos.
- fórmulas personalizadas: Cree fórmulas a medida para optimizar sus flujos de trabajo.
- Programación en VBA: Escriba e implemente código VBA con facilidad.
- Interpretación de fórmulas: Entienda las fórmulas complejas con facilidad.
- Traducción de texto: Rompa las barreras del idioma directamente en sus hojas de cálculo.
Borrar los filtros al guardar el libro de trabajo en Excel
Puede eliminar todos los filtros del libro de trabajo actual cada vez que lo guarde.
1. En el libro de trabajo del que desea borrar automáticamente todos los filtros, pulse las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En la ventana de Microsoft Visual Basic para Aplicaciones, haga doble clic en EsteLibroen el panel izquierdo Proyecto, y luego copie y pegue el siguiente código VBA en la ventana de EsteLibro (Código). Vea la captura de pantalla:
Código VBA: Borrar los filtros al guardar el libro de trabajo
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Updated by Extendoffice 20221012
Dim ws As Worksheet
For Each ws In Worksheets
If ws.AutoFilterMode Then
ws.ShowAllData
End If
Next ws
End Sub3. Pulse las teclas Alt+Qpara salir de la ventana de Microsoft Visual Basic para Aplicaciones.
A partir de ahora, al guardar el libro de trabajo, todos los filtros se eliminarán automáticamente.
Borrar los filtros al cerrar/salir del libro de trabajo en Excel
En la última sección, le mostraremos cómo eliminar todos los filtros de todas las hojas al cerrar o salir del libro de trabajo.
1. Abra el libro de trabajo del que desea borrar automáticamente todos los filtros y, a continuación, pulse las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En Microsoft Visual Basic para Aplicaciones, haga doble clic en EsteLibro en el panel izquierdo Proyecto y, a continuación, copie y pegue el siguiente código VBA en la ventana de EsteLibro (Código). Vea la captura de pantalla:
Código VBA: Borrar todos los filtros en todas las hojas al cerrar/salir del libro de trabajo
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim ws As Worksheet
For Each ws In Worksheets
If ws.AutoFilterMode Then
ws.AutoFilterMode = False
End If
Next ws
End SubNota: Si solo desea eliminar los filtros de la hoja de trabajo actual, utilice el siguiente código VBA.
Código VBA: Borrar el filtro Hoja de cálculo activa al cerrar el libro de trabajo
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updated by Extendoffice 20221012
Dim ws As Worksheet
Set ws = ActiveSheet
If ws.AutoFilterMode Then
ws.ShowAllData
End If
End Sub3. Pulse Alt+Q para salir de la ventana de Microsoft Visual Basic para Aplicaciones.
A partir de ahora, todos los filtros se borrarán automáticamente al hacer clic en el botón Cerrar del libro de trabajo.
Artículos relacionados:
- ¿Cómo se borra la caché de filtros (elementos antiguos) de una tabla dinámica en Excel?
- ¿Cómo eliminar los filtros de todas las hojas de cálculo del libro de trabajo actual en Excel?
- ¿Cómo filtrar datos en Excel según el estado de una casilla de verificación?
- ¿Cómo rellenar una serie de números en una columna de una lista filtrada en Excel?
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active 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 dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos