Autoriser seulement les chiffres et pas les lettres

Résolu

AntoineDr Messages postés 15 Statut Membre -
AntoineDr Messages postés 15 Statut Membre - 9 janv. 2015 à 18:52

Bonjour,

Je me pose la question de savoir comment interdire l'entrée d'une lettre pour le numéro d'identification de la textoBox1. Ca fait buguer tout mon programme.

Private Sub Valider_Click()

Dim i As Integer


i = TextBox1 + 1
If Feuil2.Cells(i, 1) = "" Then
MsgBox ("Numéro client incorrect")


Else

If TextBox2 <> Feuil2.Cells(i, 5) Then
MsgBox ("Veuillez entrer un mot de passe correct")

Else

gestion.Show
End If
End If
 
TextBox1 = ""
TextBox2 = ""


End Sub

Merci de votre aide.

Afficher la suite

A voir également:

Autoriser seulement les chiffres et pas les lettres
Clavier iphone chiffre et lettre - Guide
Application pour écrire les chiffre en lettre - Télécharger - Outils professionnels
Comment activer les chiffres du clavier - Guide
Tous les code possible de 0 à 9 (4 chiffres ) liste - Forum Jeux vidéo
Toutes les combinaisons possibles avec 3 chiffres ✓ - Forum Programmation

1 réponse

Réponse 1 / 1

cs_Le Pivert Messages postés 8437 Statut Contributeur 729

Bonjour,

Essaie ceci:

If Not IsNumeric(Right(TextBox1, 1)) Then
        MsgBox "Le caractere saisi n'est pas valide"
        TextBox1 = Left(TextBox1, Len(TextBox1) - 1)
        Exit Sub
    End If

quent

D'après le code que tu propose, je pense qu'il faudrait mettre ce code à l'intérieur des lignes

Private Sub TextBox1_Change()

End Sub

et non pas à l'intérieur des lignes

Private Sub Valider_Click()

End Sub

car tu ne vérifie que le dernier caractère

AntoineDr Messages postés 15 Statut Membre

Merci ça à l'air de fonctionner !

Discussions similaires

CONNEXION IMPOSSIBLE SUR CERTAINS SITES

rectangle derrière le texte

Toutes les combinaisons à 4 chiffres de 0000 a 9999

Mon clavier est bloqué, il n'écrit plus !

je ne peux plus écrire avec mon clavier

Votre réponse

Discussions similaires