Ayuda! Vincular un textbox con un valor de Combobox.
Mi pregunta es bien simple, pero no le encuentro solución...
Tengo un Combobox y varios TextBox en un formulario. Y mi pregunta es ¿cómo hago para que al seleccionar un valor del combobox, éste me rellene los TextBox?
Tengo una hoja donde sale estos datos para mayor explicacion:
Hoja1
A1 = nombres , B1 = Fecha Nacimiento , C1 = Estado Civil. Etc,etc
Y en A2 hasta A30 me selecciona el combobox con dichos nombres
Y quiero que al seleccionar "A2" (Juan Perez") en el combobox, me de en los textbox la fecha de nacimiento y los demás datos?...
8 respuestas
Te mando la solución. Tienes que programar el evento click del combobox para que cuando elijas un valor envíe la información de dicho valor a los otros textbox. Sería así:
(Este ejemplo lo he hecho con un combo y 2 textbox)
Private Sub ComboBox1_Click()
'por luismondelo
valor = ComboBox1.Value
Set busca = Sheets("hoja1").Range("a1:a100").Find(valor, LookIn:=xlValues, lookat:=xlWhole)
If Not busca Is Nothing Then
ubica = busca.Address
TextBox1.Value = Range(ubica).Offset(0, 1)
TextBox2.Value = Range(ubica).Offset(0, 2)
'continuar con otros textbox
'continuar con otros textbox
'continuar con otros textbox
End If
End Subno olvides finalizar la consulta
Muy buena respuesta.
Me sirve para muchísimas cosas, un saludo - marl boro rubio
Hola buenas noches, estoy con el mismo problema y no se como corregir el código para adaptarlo al mio, tengo 1 combobox y un textbox, en la hola "comidas" tengo el valor del combobox en "A" y el valor de precio en "b", quiero que al alegir una comida me ponga automaticamente el precio que le asigne en el textbox - Nicolas Rubino
Es un buen código. Me funcionó mientras lo ejecuto teniendo abierta la misma tabla (que es una tabla secundaria), pero si lo ejecuto teniendo abierta la tabla principal no me alimenta el textbox. ¿Cual sería el cambio debo hacerle? - Hernan Alberto Tabares