Textboxt ne pouvant accepter que des valeurs numerique

Question

Salut je voudrai créer un textbox ne pouvant accepter que des valeurs numériques. J'ai essayé de voir dans les propriétés des textbox mais rien.

acive · Answer

Salut,

As-tu fait une petite recherche sur le site?
Tu n'as rien trouvé??? pourtant moi j'ai trouvé ça en 2 secondes:

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If IsNumeric(Chr(KeyAscii)) False Then KeyAscii 0
End Sub



Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

ucfoutu · Answer

Bonjour,
Encore ????
Tu sais qui, ami eligre85 ? ===>> ce forum dispose d'un moteur de recherche et ta question fait l'objet d'une foule de discussions et d'un lot considérable de sources déposées à ce sujet !
Utilise donc ce moteur de recherche, s'il te plait.
On ne va tout de même pas revenir sans cesse à étaler du code (toujours le même), au rythme d'au moins une fois par semaine. 


____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

eltigre85 · Answer

J'ai regardé dans le moteur de recherche mais je n'ai trouvé rien  de pertinent. Merci de m'envoyer les liens correspondants à ces sujets.
Merci à tous.

ucfoutu · Answer

J'ai regardé dans le moteur de recherche mais je n'ai trouvé rien de pertinent. Merci de m'envoyer les liens correspondants à ces sujets. 

Ayant (plus exactement mon "frère jumeau jmfmarques") déposé moi-même l'un de ces sources ... j'estime que tu as mal cherché !
Allez ! Montre donc : comment et à l'aide de quels mots clés as-tu utilisé ce moteur de recherche ?

____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

cs_cheyenne · Answer

Bonjour ucfoutu,

Tu m'as coupé l'herbe sous le pied ! J'allais poser la même question...
Avec les mots adéquats j'ai obtenus 5 pages de résultats, dont un grand nombre de réponses PERTINENTES correspondant exactement à la problématique exposée.

eltigre85, quels sont le(s) mot(s) utilisé(s) pour ta recherche

Cheyenne

cs_cheyenne · Answer

Bonjour acive,

A noter que l'utilisation de IsNumeric interdit l'utilisation du BackSpace et du séparateur décimal.
Par contre c'est OK si il n'a que des valeurs entières, mais on ne sait rien à ce sujet, toujours ce manque de précisions dans les demandes !
Le pavé directionnel sera utilisé en lieu et place du BackSpace, mais j'en ai suffisamment dit... eu égard aux efforts qu'il n'a pas fait !

Bonne journée à toi,

Cheyenne

eltigre85 · Answer

J'ai utilisé le mot clé "textbox ne pouvant accepter que des valeurs numérique". Mais rien de pertinent.

cs_cheyenne · Answer

Bonjour,

Ce n'est pas un mot-clé que tu as utilisé, mais carrément une phrase...
Deux mots suffisent pour avoir des résultats pertinents.

Cheyenne

acive · Answer

Salut cheyenne,

A noter que l'utilisation de IsNumeric interdit l'utilisation du BackSpace et du séparateur décimal. 
Oui certes, mais je suis bête et discipliné 
J'ai tenu compte du titre:Textboxt ne pouvant accepter que des valeurs numerique

Et pour: carrément une phrase... tu veux dire un roman? 
Il a oublié le "S'il vous plait mr l'ordinateur"

Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

cs_cheyenne · Answer

Re bonjour acive,

Bête, non certainement pas, discipliné, oui, car tu as répondu à sa demande en te référant strictement au titre, ce qui aurait déjà pu le mettre sur une piste.
Mais bon... faut faire un effort et eltigre85 doit le faire !!!

Bien cordialement,

Cheyenne

DevLama · Answer

Utilse la fonction "IsNumeric" pour faire le Test

cs_cheyenne · Answer

Bonjour okosa,

Utilse la fonction "IsNumeric" pour faire le Test
A qui t'adresses-tu ?

Cheyenne

acive · Answer

Salut,

Allez... pour résoudre quelques problèmes de virgule BackSpace etc:

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii <> 8 And InStr(1, "0123456789,", Chr(KeyAscii)) 0 Then KeyAscii 0
End Sub



Cordialement


CF2i - Guadeloupe
Ingénierie Informatique

Textboxt ne pouvant accepter que des valeurs numerique

13 réponses

Votre réponse

Discussions similaires