Excel - Buscar Listbox de 2 columas de otra hoja Excel

 
Vista:
Imágen de perfil de Wilb
Val: 38
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

Buscar Listbox de 2 columas de otra hoja Excel

Publicado por Wilb (8 intervenciones) el 22/11/2019 06:54:32
Estimados
Una consulta:
Adjunto un archivo en el que se encuentran 2 hojas de cálculo.
En una de ellas se encuentra una tabla con una base de datos.
Y en la otra un botón que muestra un userform con el contenido de la tabla de la hoja 1 en un listbox.

Mi problema es que cuando trato de filtrar el contenido de este, me aparece solamente una columna y necesito que al filtrar se muestren ambas columnas de la tabla porque luego que aparezca el contenido filtrado, debo insertar en una celda en particular la linea seleccionada de la fila del listbox

La búsqueda se hace insertando un texto en un textbox

Mi fórmula de búsqueda es la siguiente:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Private Sub TextBox1_Change()
 
    'If Me.TextBox1.Value = "" Or Me.TextBox1.Value = " " Then
     '   Me.Height = 83
 
   ' Else
    '    Me.Height = 160
        ListBox1.RowSource = Empty
        Dim rng As Range, e
 
        Set Lista = Range("TABLA1")
        With Me
            .ListBox1.Clear
 
            For Each i In Lista.Value
                If (i <> "") * (i Like "*" & .TextBox1.Value & "*") Then
                    .ListBox1.AddItem i
                End If
            Next i
 
        End With
   ' End If
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder