Message si erreur

Bonjour,

J'utilise la méthode CDO pour envoyer des mails et j'aurais voulu savoir si il était possible, en cas d'échec de l'envoi (quelque soit l'erreur) d'afficher un message à l'utilisateur plutot que de l'envoyer dans l'éditeur vba

tu peux mettre un renvoi d'erreur,

Code:

---

1 2 3 4 5 6 7 8 9

On error goto reprendre_ici   'ici tu met tes traitements d'envoie de mail...   Exit Sub ' j'ai mis un exit sub ici car si le traitement se passe bien il lira quand meme ton "reprendre_ici:" reprendre_ici : ' en cas d'erreur le programme reprend ici msgbox("une erreure est survenue lors de l'envoie des mails") Exit sub

---

Normalement ca devrai marché

Cdlt
DoDo

Bonjour

Code:

---

1 2 3 4 5 6 7 8

On Error GoTo erreur 'ce qui peut faire erreur '..... suite du code '......fin du code Exit Sub erreur: MsgBox "erreur" End If

---

Super, ça fonctionne.

Merci beaucoup !