Filtrar hoja según el valor de celda

Como puedo filtrar mi hoja según el valor de la celda E1, trabajo con la siguiente hoja (imagen adjunta)

Saludos cordiales

Jesús

1 Respuesta

Respuesta
1

Entra en el editor de VB (presiona Alt+F11), en el explorador de proyectos busca la Hoja donde esté tu base de datos, entra en la ventana de código de la hoja y añade el siguiente código:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("E1")) Is Nothing Then
    ActiveSheet.Range("$A$2:$F$8").AutoFilter Field:=5, Criteria1:=Range("E1")
End If
End Sub

asegúrate que el rango de trabajo de tu 'tabla' es el correcto (en el ejemplo aparece $A$2:$F$8).

Con el código cada vez modifiques la celda E1, se activará y filtrará tu tabla.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas