Ver originales (Francés)

Buscar la dirección de una celda rellenada mediante un combobox

Resuelto
thomanneca -  
 thomanneca -
Hola,

Tengo un combobox en un userform. Los datos del combobox provienen de una tabla en la hoja1 (lista).

ej. lista de B3:B9 de mi hoja1

leche
harina
azúcar
especias
etc

Hasta aquí, funciona ;)

Ahora, me gustaría que al activar un botón en ese mismo userform, se registre una “x” en la misma fila que el valor seleccionado en mi cbobox.

Esto daría por ejemplo:

selecciono en mi lista la harina
harina = B4 en hoja1

quiero obtener una “x” en D4

El problema es encontrar la dirección de la celda B4.. 

Private Sub Button1_Click()

 If Button1.Enabled = True Then

 célula = ComboBox1.ListIndex.Address
 
 Range(cellule.Address).Offset(0, 2).Value = "x"
 
 End If

End Sub


Gracias por tu buena ayuda ;)

Configuración: Windows 7 / Chrome 32.0.1700.102

2 respuestas

  1.
    f894009 Mensajes publicados 17417 Fecha de registro   Estado Miembro Última intervención   1 717
     
    Hola, 

    Private Sub CommandButton1_Click()
     'si rango de celdas nombrado
     Range(Range("liste").Cells(ComboBox1.ListIndex + 1, 1).Address).Offset(0, 2).Value = "x"
     'o
     Range("B" & 3 + ComboBox1.ListIndex).Offset(0, 2).Value = "x"
    End Sub
    0
  2. thomanneca
     
    Genial, creo que eso era lo que necesitaba ;)

    ¡Gracias por tu ayuda!
    0