Textbox que dependa de un combobox

Tengo dos combobox vinculados entre si, osea en uno aparece el piso y el otro segun el piso los ambientes disponibles, pero me falta que en un textbox me aparezca el precio del ambiente.

¿Me podrian dar el codigo para programarlo?

Los datos los tengo en una hoja de excel que se llama "base3"

En la columna A estan los nombres de los ambientes, en la columna B estan los precios. Los anombre y precios empiezan desde la fila 2 por que en la fila 1 dice "ambientes" y "precios"

El comboBox donde se registran los ambientes se llama "combobox2"

Y quiero que aparezcan en un "textBox5"

Por favor, ya voy dias queriendo programar esto

1 Respuesta

Respuesta

H o l a:

Private Sub ComboBox2_Change()
'Por.Dante Amor
    If ComboBox2 = "" Then Exit Sub
    Set h = Sheets("base3")
    Set b = h.Columns("A").Find(ComboBox2, lookat:=xlWhole)
    If Not b Is Nothing Then
        TextBox5 = b.Offset(0, 1)
    End If
End Sub

Prueba y me comentas.


':)
':)

Deberías quitar la instrucción Option Explicit

Si quiere definir las variables, entonces queda así:

Private Sub ComboBox2_Change()
'Por.Dante Amor
    dim h, b
    If ComboBox2 = "" Then Exit Sub
    Set h = Sheets("base3")
    Set b = h.Columns("A").Find(ComboBox2, lookat:=xlWhole)
    If Not b Is Nothing Then
        TextBox5 = b.Offset(0, 1)
    End If
End Sub


':)
':)

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas