RE:duda//modulo
Publicado por christian Chileno (10 intervenciones) el 27/04/2005 15:52:32
Crealo en un modulo
ej
Public Sub procedimiento()
On Error GoTo PROC_ERR
msgbox"procedimiento"
PROC_EXIT:
Exit Sub
PROC_ERR:
MsgBox "Error: " & Err.Number & ". " & Err.Description, , _
"app"
Resume PROC_EXIT
End Sub
y en cualquier formulario lo llamas con
call procedimiento
ej
Public Sub procedimiento()
On Error GoTo PROC_ERR
msgbox"procedimiento"
PROC_EXIT:
Exit Sub
PROC_ERR:
MsgBox "Error: " & Err.Number & ". " & Err.Description, , _
"app"
Resume PROC_EXIT
End Sub
y en cualquier formulario lo llamas con
call procedimiento
Valora esta pregunta
0