BuscarV en Formulario de Excel
Hola expertos.
tengo 1 formulario con 2 Textbox, en el textbox 1
ingreso un código y en el textbox 2 me debe dar una lera.
Alguien sabes si se puede usar un buscarv en formularios?
Un ejemplo seria así:
Textbox 1 = 2 Textbox 2 = b
Tabla
1 a
2 b
3 c
4 d
cosa que si ingreso en textbox 1 "3", el textbox 2 me muestre c
Muchas gracias ....
1 respuesta
Necesitas tener estas líneas de código dentro del evento EXIT, AFTER_UPDATE o en un botón del formulario. (La hoja "datos" y el rango "a1:a..." están inventados.
Recuerda PUNTUAR y FINALIZAR la consulta
...
...
valor = textbox1
set busca = sheets("datos").range("a1:a" & range("a65000").end(xlup).row).find(valor,lookin:=xlvalues,lookat:=xlwhole)
if not busca is nothing then
textbox2.value = busca.offset(0,1)
...
...
Sabes que lo puse en un evento del botón pero me da error y se coloco en amarillo :
Private Sub CommandButton1_Click()
Gracias
Hola creo que tengo problemas en este código:
If Not busca Is Nothing Then
TextBox2.Value = busca.Offset(0, 1)
Ahí me arroja el error..
La macro funciona perfectamente. Dime un mail y te mando un ejemplo para que lo veas
Gracias
Ya te he mandado el mail
