Error en llamada de datos desde formulario
Hola experto!
Tengo un formulario "frmID" con dos cajas de texto (txtUsuario y txtContraseña) y dos botones (Cancelar y Aceptar). El libro consta de varias hojas (en mi caso se llaman Tabellexx), la hoja "Tabelle10" tiene en el campo A2 el usuario y en el campo B2 la contraseña.
Mi problema es que no encuentro el error en esta sentencia y me pone error en tiempo de ejecución n° 9 -Index out of range- (¿?)
La sentencia If, (si se llama así), dentro del botón aceptar, la escribí en una sola línea.
Private Sub CmdEnter_Click()
If frmID.txtUsuario.Value = Worksheets("Tabelle10").Range("A2").Value And frmID.txtPassword.Value = Worksheets("Tabelle10").Range("B2").Value Then
Unload Me
Load frmEntrada
frmEntrada.Show
Sheets("Tabelle2").Select
Else
Unload Me
ThisWorkbook.Close
End If
End Sub
Luego, de poder entrar en el libro, se carga otro formulario que lo llamé frmEntrada y me muestra la hoja 2 (Tabelle2). Si no se cumple la condición de usuario/contraseña entonces descarga el libro y lo cierra.
Si me puedes ayudar te lo agradecería mucho. Gracias también por el tiempo que dedicas a esto y a las tantas respuestas que me han ayudado.
Gracias
Juan Manuel
Tengo un formulario "frmID" con dos cajas de texto (txtUsuario y txtContraseña) y dos botones (Cancelar y Aceptar). El libro consta de varias hojas (en mi caso se llaman Tabellexx), la hoja "Tabelle10" tiene en el campo A2 el usuario y en el campo B2 la contraseña.
Mi problema es que no encuentro el error en esta sentencia y me pone error en tiempo de ejecución n° 9 -Index out of range- (¿?)
La sentencia If, (si se llama así), dentro del botón aceptar, la escribí en una sola línea.
Private Sub CmdEnter_Click()
If frmID.txtUsuario.Value = Worksheets("Tabelle10").Range("A2").Value And frmID.txtPassword.Value = Worksheets("Tabelle10").Range("B2").Value Then
Unload Me
Load frmEntrada
frmEntrada.Show
Sheets("Tabelle2").Select
Else
Unload Me
ThisWorkbook.Close
End If
End Sub
Luego, de poder entrar en el libro, se carga otro formulario que lo llamé frmEntrada y me muestra la hoja 2 (Tabelle2). Si no se cumple la condición de usuario/contraseña entonces descarga el libro y lo cierra.
Si me puedes ayudar te lo agradecería mucho. Gracias también por el tiempo que dedicas a esto y a las tantas respuestas que me han ayudado.
Gracias
Juan Manuel
{"Lat":47.3778945415552,"Lng":8.5308837890625}
1 respuesta
Respuesta de Roberto Alvarado
1