Problème Textbox keypress

LANGAZOU Messages postés 95 Date d'inscription   Statut Membre Dernière intervention   -  
 Maurice -
Bonjour,

j'ai deux problèmes avec mon USERFORM qui sont les suivants:

1) j'ai des textbox ou je veux taper uniquement des chiffres et d'autres avec uniquement des lettres .

2) j'ai un textbox ou je vais taper des taux dessus ,je veux que lorsque je tape un point il la remplace par virgule automatiquement.

Merci pour votre réponse.

1 réponse

Maurice
 
Bonjour
en principe on remplace la virgule par le point

Private Sub TextBox6_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
   Select Case KeyAscii
      Case 46, 48 To 57 '0 à 9 sont acceptes & .
         KeyAscii = KeyAscii
      Case 44
         KeyAscii = 46
   Case Else 'elimine toute autre entree
      KeyAscii = 0
   End Select
End Sub

A+
Maurice
0