Como hacer para que aparezca un resultado en un campo de texto al escoger un nombre de un combo box en un UseForm?

Ocupo poder escoger un nombre de un combo box y que me de como resultado en un campo de texto un numero de ruta. Ejemplo:

Respuesta
1

Haciendo muchas suposiciones te dejo esto:

Private Sub ComboBox1_Change()
Set h = Sheets("Hoja1")
Set b = h.Columns("J").Find(ComboBox1.Value, LookAt:=xlWhole)
        If Not b Is Nothing Then
        TextBox1.Value = h.Cells(b.Row, "K")
        End If
End Sub

Busca el valor que coincida con tu valor del combobox1 en ka columna J y regresa el valor correspondiente de la columna K en el textbox 1.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas