VBA - Bloquer la saisie d'une TextBox entre deux numeriques [Résolu]

Nat44200 24 Messages postés jeudi 4 août 2011Date d'inscription 24 août 2011 Dernière intervention - 9 août 2011 à 11:07 - Dernière réponse : Nat44200 24 Messages postés jeudi 4 août 2011Date d'inscription 24 août 2011 Dernière intervention
- 9 août 2011 à 11:50
Bonjour a tous ,

Pour un projet je realise une application VBA.
Dans cette application VBA j'ai cree un USF. Dans cette USF j'ai une TextBox que j'ai bloquer pour n'avoir que des numeriques et avec deux chiffre apres la virgule maximun:

Private Sub TextBox1_Change()
If Right(TextBox1, 1) "." Or Right(TextBox1, 1) "," Then TextBox1.MaxLength = Len(TextBox1) + 2
End Sub

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Dim allowedKeys As String
allowedKeys = "0123456789,." & Chr(8)
If InStr(allowedKeys, Chr(KeyAscii)) 0 Then KeyAscii 0
End Sub

Mon probleme maintenant est que je souhaite limiter la saisie de ma TextBox1 entre deux numeriques 0 et 1 (par exemple 0.25 ou 0.99 mais pas 1.01).

Merci beaucoup de votre aide.
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
ucfoutu 18039 Messages postés lundi 7 décembre 2009Date d'inscriptionContributeurStatut 11 avril 2018 Dernière intervention - 9 août 2011 à 11:42
3
Merci
Bonjour,

comme ceci (exemple) ?
Private Sub TextBox1_Change()
  Static anc As String
  If Val(Replace(TextBox1.Text, ",", ".")) > 0.99 Then TextBox1.Text anc Else anc TextBox1.Text
End Sub


____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP

Merci ucfoutu 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 90 internautes ce mois-ci

Commenter la réponse de ucfoutu
Nat44200 24 Messages postés jeudi 4 août 2011Date d'inscription 24 août 2011 Dernière intervention - 9 août 2011 à 11:50
0
Merci
Ouha !!! Merci de ta rapidite !!!

C'est excatement ce que je voulais !!!!
Commenter la réponse de Nat44200

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.