Macro cuadro combinado en excel

En hoja1 tengo un cuadro combinado cuyos datos están en hoja2 y me entrega un N° que es la fila de la base de datos. Al llevarla a una variable FILA1 dice que esta mal definida

FILA1 la definí como Integer

1 Respuesta

Respuesta
1

En mi ejemplo los datos los tengo en hoja2 empezando desde A1 hacia abajo. En a1 está el encabezado

Con esta macro nos devuelve la linea de excel en la que está sumando 2 porque los datos empiezan en el index 0 y también por el encabezado de la hoja

Private Sub ComboBox1_Change()

MsgBox ComboBox1.ListIndex + 2

End Sub

Estimado amigo  muchas gracias por responderme

Te aclaro mas mi problema:Hice un cuadro combinado(Control de formularios) En formato de control (botón dcho) en Hoja2 seleccione el vector de proyectos En vincular con celda puse J1

Sub Auto_open()

dim fila1 as integer, hoja2 as scheets

sheets("Hoja2").visible=true

Msgbox("Elige un proyecto")

fila1.value=sheets("Hoja1").Range(("J1").value

me lanza error de compilación en Fila1

End sub

A simple vista sobraba un paréntesis en esta sentencia:

fila1.value=sheets("Hoja1").Range("J1").value

Disculpa Experto

Pero me sigue dando error

Disculpa mi perseverancia

Gracias muchas de antemano por tu dedicación

Atentamente

hugo20073

La fila correcta es así:

fila1=sheets("Hoja1").Range("J1").value

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas