Hola Antoni pues me agrada que te haya impresionado, Angelo gracias por tus palabras, German te agarre en curva {te sorprendi} visita mas seguido mi blog te lo recomiendo jejeje, juegomal abre un tema para tu consulta porfavor y relaciona si deseas este tema con el tuyo
Mencionar que a este Turbo filtro solo le hice unas pequeñas modificaciones para subirlo y quedo bien al parecer.... pues para no abrir otro tema y seguir aportando, adjunto otro muy similar, ya que es una macro de evento...
Este es el codigo:
Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False On Error Resume Next Range("B4").CurrentRegion.AdvancedFilter 1, _ Range("B1").CurrentRegion Application.ScreenUpdating = True End Sub [/PHP]
Puede notar que es muy sencilla la macro, pero si efectiva y practica, con esta la unica diferencia es que deben ingresar el asterisco manualmente, por ejemplo en B2 asi: *t* y la macro actuara filtrando automaticamente los datos
Espero sea tambien de mucha utilidad
Saludos desde Honduras
Turbo filtro_.zip