Lista desplegable

[Gigi74]

Buenos días, necesito que al seleccionar un elemento de una lista desplegable me muestre solamente los resultados de esa selección  en otra tabla. Por poner un ejemplo, sobre el archivo que adjunto al seleccionar en la lista desplegable A1 solo aparezca lo sombreado en amarillo. El resto oculto.

Gracias de antemano

Libro2.xlsx

[Israel Cassales]

Una idea con VBA

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim ws As Worksheet
    Dim filterRange As Range
    Dim selectedValue As String
    Dim lastRow As Long
    Set ws = ThisWorkbook.Sheets("Hoja1")
    lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    Set filterRange = ws.Range("A4:D" & lastRow)
    If Not Intersect(Target, ws.Range("B2")) Is Nothing Then
        selectedValue = ws.Range("B2").Value
        filterRange.AutoFilter Field:=1, Criteria1:=selectedValue
        If selectedValue = "" Then
            filterRange.AutoFilter
        End If
    End If
End Sub

[Israel Cassales]

Libro2.xlsb