Gestionnaire d'erreurs

[lolo]

Bonjour à toutes et à tous,

J'ai un projet VBA dans lequel j'ai une procédure de démarrage, laquelle appelle un formulaire, lequel permet d'ouvrir d'autres formulaires par des boutons, etc...

Je cheche à activer le gestionnaire d'erreur pour qu'en cas de plantage certaines instructions soient systèmatiquement éxécutées. J'ai constaté que si je mets l'instruction "On Error goto" dans la procédure de démarrage, elle n'est active que dans cette procédure, et non plus à partir du moment où je suis dans mes formulaires... Est-ce que ça veut dire qu'il faut que je répète "On Error Goto" dans chaque formulaire (dans la routine "Initialize" par exemple) ?

Merci d'avance à tous ceux qui pourront m'aider.

lolo

 

[Talere]

Il faut savoir que si une procédure ou une fonction ne peut pas gérer l'erreur (absence de on error ...), celle ci est renvoyé à la procédure appelante. Si aucune procédure appelante, l'erreur est fatale.

Il faut donc mettre "on error ..." à chaque début de procédure de tous tes boutons.

sub bouton_click()
on error resume next
call fonction1<- l'erreur est récupérée à cet endroit
end sub

function1()
fonction2
end function

function2()
'<- Provocation d'erreur
end function

 

[Roland]

Bonsoir lolo

Pour de que j'en sait la réponse est oui chaque a sa gestion d'erreur.
C'est mon dernier mot mais je ne suis pas sûr de gagner ......

Roland

 

[lolo]

OK, Merci Talere