On Error....
Publicado por Juan (9 intervenciones) el 03/10/2002 13:31:58
Hola a tod@s, espero que me podais ayudar porque no se me ocurre que hacer con esto. Tengo el siguiente trozo de código:
On Error GoTo errores
.
.......
errores:
If Err.Number = 62 Then
Err.Clear
Resume Next
Else
Err.Clear
MsgBox "Se ha producido el siguiente error: " & Chr(13) & Err.Description
Resume Next
End If
El problemilla que tengo es que si se vuelve a producir el error 62 o cualquier otro no vuelve a irse a la etiqueta errores para poder tratarlo sino que me muestra el error y rompe el programa. ¿Que puedo hacer????
Gracias de antemano por la ayuda. Saludos
On Error GoTo errores
.
.......
errores:
If Err.Number = 62 Then
Err.Clear
Resume Next
Else
Err.Clear
MsgBox "Se ha producido el siguiente error: " & Chr(13) & Err.Description
Resume Next
End If
El problemilla que tengo es que si se vuelve a producir el error 62 o cualquier otro no vuelve a irse a la etiqueta errores para poder tratarlo sino que me muestra el error y rompe el programa. ¿Que puedo hacer????
Gracias de antemano por la ayuda. Saludos
Valora esta pregunta


0