Discussion :

[gwems]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[fgiambelluco]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

[timat35]

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