ComboBox que muestra un resultado en base a lo seleccionado en otro

[SERGIO MULERO RIVERA 1]

Hola Compañeros.

 

He realizado búsquedas pero no doy con la propiedad que me permita lo siguiente.

Tengo un Userform con 2 ComboBox (uno pide un número y el otro el usuario asociado a ese número) y un Button (Aceptar). 

Me gustaría que al seleccionar el número del ComboBox 1 se mostrara automáticamente el usuario en el ComboBox 2.

Lo he intentado con Additem, pero lo que consigo es que se agregue nuevamente el usuario a la lista, lo que querría es que lo muestre en el ComboBox. 

¿Con qué propiedad podría hacer esto?

Agradezco su ayuda de antemano, gracias. 

 

[Toldeman 330]

Hola.

Sube un pequeño ejemplo de lo que quieres hacer, y en base al archivo podremos trabajar tu consulta.

 

Un saludo.

[Haplox 1,117]

En 21/4/2019 at 14:00 , SERGIO MULERO RIVERA dijo:

¿Con qué propiedad podría hacer esto?

Principalmente te diría que no uses 2 combobox ¿Para qué, si en el segundo no vas a elegir nada? Usa el combobox1 y un textbox. Una vez que elijas en el combobox el número, pases ese dato a una variable, con ella busques en la hoja de datos ese valor, y cuando lo encuentre que te muestre en el textbox el usuario, que supongo que estará en un offset(0,1) desde la celda del número.

Algo así, adaptándolo a tu caso:
 

Private Sub ComboBox1_Change()
Dim num As String, uF As Long, us As Range

num=ComboBox1

With Sheets("Datos")
	uF=.Range("A" &Rows.Count).End(xlUp).Row
	Set us=.Range("A1:A" & uF).Find(num,LookAt:=xlWhole)
		If Not us Is Nothing Then
			TextBox1=us.Offset(0,1)
		Else
			MsgBox "El Nº introducido no existe, revíselo"
			Exit Sub
		End If
End With

End Sub