Como Mostrar datos en combobox dependiendo de una referencia textbox Excel
Lo que pretendo hacer es lo siguiente tengo una base de datos en la hoja 1 donde la columna A "ID" y la columna B"# FACTURA", aclaracion el id es el id de clientes osea que en la columna "a" puede estar el mismo id pero con diferente numero de factura en la columna B, teniendo esto claro, vamos a lo siguiente, tengo un userform donde tengo un textbox y un combobox, ahora cuando ingrese la id en la caja de texto me carguen los datos de las facturas que aparecen en la columna b con referencia a id
1 respuesta
Pon el siguiente código en tu userform
Cada que introduzcas el ID en el texbox, la macro buscará el ID en la columna A y cargará el combobox con las coincidencias.
Cambia en el código "Hoja1" por el nombre de tu hoja.
Private Sub TextBox1_Change()
ComboBox1.Clear
If TextBox1.Value = "" Then Exit Sub
'
Set h = Sheets("Hoja1")
Set r = h.Columns("A")
Set b = r.Find(TextBox1.Value, lookat:=xlWhole)
If Not b Is Nothing Then
celda = b.Address
Do
ComboBox1.AddItem h.Cells(b.Row, "B").Value
Set b = r.FindNext(b)
Loop While Not b Is Nothing And b.Address <> celda
End If
End Sub'.[Sal u dos. Dante Amor. No olvides valorar la respuesta.
¡Gracias! muchas gracias es perfecto lo que necesitaba
Hola dante . Tengo otra pregunta . Se puede mostrar el numero de coincidencias en un label o texbox dentro del mismo userform?
Sí se puede.
Con gusto te ayudo con todas tus peticiones, crea una pregunta nueva por cada petición.
