Ayuda control de Errores
Publicado por José Maria (139 intervenciones) el 19/09/2015 13:02:11
Buenas,
Tengo un formulario2 que recoge datos del formulario 1.
Cuando quiero abrir el Formulario 2 sin haber Escrito en el Formulario 1 te debe de saltar un error.
Mi problema es que a pesar del error se abre ese formulario.
Lo que quiero es que si da el error no se abra el formulario.
Os pongo mi código a ver si podeis orientarme a ver que me falta.
Tengo un formulario2 que recoge datos del formulario 1.
Cuando quiero abrir el Formulario 2 sin haber Escrito en el Formulario 1 te debe de saltar un error.
Mi problema es que a pesar del error se abre ese formulario.
Lo que quiero es que si da el error no se abra el formulario.
Os pongo mi código a ver si podeis orientarme a ver que me falta.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub cmdControlExpediente_Click()
On Error GoTo Error:
DoCmd.OpenForm "F_Nuevo_Control_Expediente", , , , acFormAdd 'El usuario puede agregar registros nuevos pero no puede modificar los existentes.
Salir:
Exit Sub
Error:
MsgBox Err.Description
Exit Sub
Resume Salir
End Sub
Valora esta pregunta
0