forcer inputbox au format INTEGER

bonjour ...
dans mon code VBA , j' ai besoin d' effectuer une boucle le nombre de passage dans cette boucle m' est donnée par une inputbox.
le problème c' est que je souhaiterait limiter la saisie dans l'inputbox afin de ne pouvoir encoder que des chiffres...

Voici mon code..

Code:

---

1 2 3 4

Dim nbre as integer nbre = InputBox("Nombre d' exemplaires souhaiter :") '..... et apres je fais la boucle

---

j 'ai deja consulter les tuto mais je n'ai pas trouver de sollutions.
merci a vous

Bonjour
La inputbox ne renvoi que du texte.
Tu peux essayer çà, une boucle jusqu'à la saisie d'une valeur numérique:

Code:

---

1 2 3

Do until isnumeric(nbre) nbre = InputBox("Nombre d' exemplaires souhaiter :") Loop

---

Sinon tu peux rédevelopper une InputBox dans un nouveau formulaire. Au mois tu pourras controler ce que tu veux sur le clic du bouton OK.

Bonjour,

Tu peux aussi créer un variable String temporaire
_Stocker la valeur de ton InputBox dedans
_Tester si la variable est Numeric avec IsNumeric

Si oui : utilise la fonction Cint pour transformer la variable en nombre entier
Si non : renvoie le message d'erreur approprie