Dernière chose pierrejean,
Dans la boîte de dialogue input, si l'utilisateur clique sur Annuler, il génère une erreur type Débogage
Alors, j'ai essayé d'insérer ce code mais il marche pas:
If Cancel Go To FIN
FIN:
MsgBox("Procédure interrompue par l'utilisateur!"), vbI