Como deshabilitar el filtro de un Libro
Buenas tardes,
tengo un libro donde hay varias hojas en las cuales aplico filtros avanzados mediante macros, pero cuando cierro el libro esas hojas quedan con el filtro activado, quisiera saber si hay algun comando para quitar el filtro de las hojas en el momento que cierras el libro, o en el momento que terminas de hacer la consulta del filtro en la hoja.
1 respuesta
Pon la siguiente macro en los eventos de thisworkbook para quitar todos los filtros avanzados de tu libro:
Private Sub Workbook_BeforeClose(Cancel As Boolean) 'Por.DAM For Each h In Sheets If h.FilterMode Then h.ShowAllData End If Next End Sub
Instrucciones para poner la macro en ThisWorkbook
1. Abre tu libro de excel
2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
3. Del lado izquierdo dice: VBAProject, abajo dale doble click a ThisWorkbook
4. Del lado derecho copia la macro
Si quieres quitar el filtro avanzado después de realizar un filtro avanzado con macro, pon lo siguiente en tu macro, por ejemplo:
Sub Macro7()
'Por.DAM
'instrucciones de tu macro
ActiveSheet.Range("D5:F9").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _
("D1:D2"), Unique:=False
'instrucciones de tu macro
'quitar el filtro avanzaso
If ActiveSheet.FilterMode Then
ActiveSheet.ShowAllData
End If
End SubSaludos.Dante Amor
Recuerda valorar la respuesta.
Hola dante,
¿Esto funciona para un filtro normal? Estoy poniendo el primer código en ThisWorkbook pero una de las hojas llamada FECHAS, me deja activado los filtros.
Para un autofiltro es
if actievesheet.autofiltermode then autofiltermode = false
