Saltar al contenido
publicado

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

Featured Replies

publicado

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

image.png.25cf23574b30978d22f21473f8703e58.png

publicado
  • Autor

Gracias por su ayuda!!!

publicado
  • Autor

Hola de nuevo. voy a complicarlo un poco más. Si añado un segundo filtro nuevo. Me da igual que ambos filtros condicionen o no a la hora de seleccionar ambos. Si condicionan mejor, si es posible.

Gracias por antelación

Libro2A.xlsx

publicado

Hola a ambos,

@Gigi74, si te es igual conseguirlo en un rango aparte,  puedes aplicar:

=APILARV(A4:D4;FILTRAR(A5:.D999;(A5:.A999=B2)+(B5:.B999=B3)))

Saludos,

publicado
  • Autor

Gracias de  todas formas, pero busco hacerlo con VBA. Son 12.000 filas a filtrar

publicado
  • Autor
En 11/3/2025 at 15:09 , Gigi74 dijo:

Hola de nuevo. voy a complicarlo un poco más. Si añado un segundo filtro nuevo. Me da igual que ambos filtros condicionen o no a la hora de seleccionar ambos. Si condicionan mejor, si es posible.

Gracias por antelación

Libro2A.xlsx 9.44 kB · 2 descargas

 

Crear una cuenta o conéctate para comentar