Bonjour à tous,
j'essaye nerveusement depuis deux jours d'interdire à l'opérateur de saisir des chiffres dans une combobox, mais je n'y arrive pas!!
Je sais faire (j'ai copié) pour interdire la saisie de lettres où des chiffres sont attendus.
Sub JyArrivePas
Dim NombCh As Integer
' On indique le gestionnaire d'erreur
On Error GoTo PasUnNombre
' On récupère la valeur chaine
NombCh = NumFiche.Text
msgbox "Bonne saisie, félicitations", vbOKOnly, "BRAVO !!!"
Exit Sub
' Gestion de l'erreur de saisie dans le numéro de fiche
PasUnNombre:
MsgBox "Un numéro ne comporte que des chiffres", vbOKOnly, "STOP AUX MOUFLES"
End Sub
Naïvement, j'ai cru qu'en remplaçant integer par string dans la déclaration. Le On Error déclencherait sur les caractères non "string" mais non.
Je suis sur que c'est rien du tout, mais je suis bloqué.
Merci de votre aide!!
Garba