mensaje de Error en blanco

[gndark]

Hola A todos:

Estoy desarrollando una aplicacion y lo que pasa esque uso la instruccion eror asi:

On Error GoTo error
Data1.Recordset.Delete
error:
MsgBox Err.Description

por ejemplo, y lo que pasa es que siempre me manda mensajes de error en blanco, y lo que quiero es que lo mensajes de error en blanco no me aparescan.

Muchas gracias

[tazzito]

es simple si tienes el manejador de error al final ponle un exit funcion o exit sub segun corresponda antes, un manejador de error es solo una etiqueta para ocupar saltos dentro del codigo, pero no quiere decir que si sigue la logica no se ejecute despues de la linea anterior.. espero haber sido claro pero mejor un ejemplo con tu codigo :$

On Error GoTo error
Data1.Recordset.Delete
exit sub '<<--- aca sales del bucle antes de mandar el mensaje (si hay error salta al manejador ovbiando esta sentencia)
error:
MsgBox Err.Description

[gndark]

Oye muchas gracias, me funciono muy bien, mi Dios te bendiga

[Improvisado]

Si bien esta contestado te comento como coloco la etiqueta de error:

On Error GoTo error
Data1.Recordset.Delete

error:
if error.number <> 0 then
MsgBox Err.Description
end if

Como siempre va a parar por la etiqueta solo muestra el mensaje si el código de error es distinto de cero, o sea cero (0) no hay error.
Saludos