Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

controle du type de donnée d'un Textbox

  • Initiateur de la discussion Rico
  • Date de début
R

Rico

Guest
Salut,

je cherche a effectuer à vérifier que l'on me rentre bien un entier dans un textbox... pour le moment j'ai le code suivant (ou "nbre" est le nom de mon textbox)

--------------------------------------------------------------------------------
Private Sub nbre_Exit(ByVal Cancel As MSForms.ReturnBoolean)
With nbre
If VarType(.Value) <> 3 Then '<= PB ICI!!!
MsgBox "Saisie incorrecte"
.SelStart = 0
.SelLength = Len(.Text)
Cancel = True
End If
End With
End Sub
----------------------------------------------------------------------------------

Si quelqu'un a la solution... merci d'avance
 
A

Alain

Guest
Bonjour,


Essayes avec :

Private Sub nbre_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If InStr("0123456789", Chr(KeyAscii)) = 0 Then
KeyAscii = 0
End If
End Sub


@+
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…