Devolver valor de un ComboCox en TextBox
A ver quien puede ayudarme.
Tengo una tabla con datos en 3 columnas.
Tengo un ComboBox1 que selecciona un nombre de la primera columna de "Tabla3" y quiero que me devuelva el valor de la segunda y tercera columna de la "Tabla3" en un TextBox1 y TextBox2 pero no se como hacerlo.
2 Respuestas
Respuesta de Programar Excel
1
Respuesta de Carlos Arrocha
1
[Hola Javier. Te pongo un ejemplo para un botón, pero también lo puedes poner dentro del evento change del combobox.
Private Sub CommandButton1_Click()
If ComboBox1 = "" Then Exit Sub
Set h = Sheets("Hoja1")
Set b = h.Range("A:A").Find(ComboBox1, LookIn:=xlValues, lookat:=xlWhole)
If Not b Is Nothing Then
TextBox1 = h.Range("B" & b.Row)
TextBox2 = h.Range("C" & b.Row)
Else
MsgBox ("El código no existe")
End If
End SubDoy por hecho que cargas el combobox con los datos de la hoja. Recuerda cambiar, en el código, el nombre del combobox1 por el que tengas, igual con los textbox.
Espero que sea lo que necesitas, si es así, recuerda valorar la respuesta.