textboxRésolu

Question

Bonjour,
Dans une userform je récupère des valeurs numériques grâce à des textbox. Ensuite je vérifie que c'est bien un nombre qui est donné.
voici mon code:
On error goto pasunnombre
Nbbarre=TextBox1.text
...

Pasunnombre:
msgbox("entrer un nombre")
exit sub
Je programme en vba.
Mon problème est que si je rentre deux chiffres dans la textbox le message d'erreur s'affiche.
Est-ce que vous auriez une idée pour éviter cela.

Merci d'avance.

fabrice2205 · Accepted Answer

Oui je me suis tromper c'est :
Nbbarre=textBox1.text
...
Exit sub
Pasunnombre:
MsgBox("Entrer un nombre")
End Sub

inconnu974 · Answer

Bonjour

Je connais pas vba mais peut etre qu'il faudrai sortir de la méthode avant :

public sub monSub()

On error goto pasunnombre
Nbbarre=TextBox1.text
...

exit sub

Pasunnombre:
msgbox("entrer un nombre")

end sub

jmfmarques · Answer

Oui...
et tu t'es également trompé en postant ici : Thèmes / VB.NET et VB 2005 alors que tu développes finalement non en VB.Net mùais en VBA !
En attendant : intéresse-toi donc à l'utilisation de Isnumeric (dans ton aide en ligne)

cs_Exploreur · Answer

Salut Jmfmarques,

Cela faisait déjà un petit moment que l'on avait plus cette question sur les numériques...lol...Et si on lui donné un petit truc à la Jmf ??

A+
Exploreur

 Linux a un noyau, Windows un pépin

cs_Exploreur · Answer

Salut,

Tu as trouvé ta réponse ou pas ?

A+
Exploreur

 Linux a un noyau, Windows un pépin

fabrice2205 · Answer

Oui merci,
j'ai recompilé et maintenant ca marche
Il y avait peu etre un bug

Textbox

6 réponses

Votre réponse

Discussions similaires