PARA DAM: Ligar ComboBox con TextBox.

Amigo Dam, nuevamente yo.
Me acaba de surgir una nueva duda, quiero ligar un ComboBox a un TextBox.
Tengo un UserForm con estos dos complementos mencionados, el ComboBox esta direccionado a una lista de la Hoja1 en los rangos "A1:A10" del mismo archivo con la siguiente propiedad.
Propiedad del ComboBox "Rowsource Hoja1!A1:A10". Este listado tiene nombres propios como María, Juan, Edgar, etc.
En los rangos "B1:B10" de la misma hoja tengo nombres de áreas a las que pertenecen, ejemplo de las dos columnas.
A B
1 ROSA FINANZAS
2 MARÍA COMERCIAL
3 JUAN RH
4 EDGAR DISEÑO
5 RAMIRO CATMAN
Quiero que cuando seleccione algún nombre del ComboBox (Nombres Propios), el TextBox de forma automática nos muestre la información correspondiente a ese nombre, ejemplo.
Si selecciono en el ComboBox "Edgar", en el TextBox deberá aparecer en forma automática "Diseño",
Me puedes ayudar por favor amigo.
Quedo en espera de tu gran ayuda como ya es costumbre.
Saludos, JPC...!!

1 Respuesta

Respuesta
1

Prueba esto

Private Sub ComboBox1_Change()
f = ComboBox1.ListIndex + 1
TextBox1 = Sheets("Hoja1").Cells(f, "B")
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas