probleme pour les "on error goto ..."

Question

Bonjour a tous,

J'ai un probleme en ce qui concerne mes fonctions en vba. Pour gérer le mieux possible les erreurs eventuelles, j'utilise la fameuse ligne : On Error GoTo Gestion_Erreur
Puis en fin de programme, je met "Gestion_Erreur:" suivit du code approprié (par exemple un message d'erreur).
Mon probleme vient du fait que ce message s'affiche toujours, meme lorsque qu'aucune erreur ne se passe, alors est ce que quelqu'un a une idee pour resoudre ce probleme, car pour l'instant, il met impossible de gerer la moindre erreur!

Merci pout l'aide que vous pourriez m'apporter.

Hasen

cs_moustachu · Answer

Tu as un truc du genre :

Sub toto()
On Error Goto Gestion_Erreur

CODE

Gestion_Erreur:
If err.number <> 0 Then
   CODE_GESTION_DERREUR
End if
End Sub

?

++
Moustachu

cs_hasen · Answer

ben ecoute ca a l'air de bien marcher! Merci beaucoup!

crenaud76 · Answer

Il faut que tu ajoute un "Exit Sub" ou "Exit Function" juste avant ton "Gestion_Erreur:" Comme cela, si Vb atteind cette ligne, c'est qu'il n'y a pas eu d'erreur et il sort de la procédure/fonction

Christophe R.

Probleme pour les "on error goto ..."

3 réponses

Discussions similaires