Pascal,
Encore une fois merci, ça marche très bien... sauf que pour l'instant je ne traite pas l'erreur, je n'utilise pas ton code
fin:
msgbox 'vous devez entrer un entier'
textbox1.value=''
End Sub
Ceci dit comme j'ai essayé je vois que les instructions entre fin: et End Sub sont éxécutées à coup sur. Comment éviter d'avoir un message d'erreur dans le cas où il n'y a pas d'erreur?
J'imagine qu'un truc comme
...
goto vraiefin
fin:
traitement d'erreur
vraiefin:
End Sub
Permettrait de ne traiter l'erreur que s'il y a vraiment eu une erreur, mais c'est un peu crado. Peut-être utiliser une variable de statut?