Jump to content
SERGIO MULERO RIVERA

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

Recommended Posts

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. 

 

Share this post


Link to post
Share on other sites
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

 

Share this post


Link to post
Share on other sites



×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png