Pas encore inscrit ?

Pourquoi ne pas vous inscrire ? C'est simple, rapide et gratuit.
Pour en savoir plus, lisez Les avantages de l'inscription... et la Charte de Zébulon.
De plus, les messages que vous postez en tant qu'invité restent invisibles tant qu'un modérateur ne les a pas validés. Inscrivez-vous, ce sera un gain de temps pour tout le monde, vous, les helpeurs et les modérateurs !

Se connecter

ou

S’inscrire

[VBA excel 2007] Saisie numérique textbox erreur

Par Invité pml
le 14 juin 2010 dans Programmation

https://forum.zebulon.fr/topic/177406-vba-excel-2007-saisie-num%C3%A9rique-textbox-erreur/

Abonnés 0

Messages recommandés

Basphet

Posté(e) le 23 juin 2010

- Signaler

Posté(e) le 23 juin 2010

Bonjour.

Oui c'est normal car ta variable virgule reste à true.

Il faudrait dans ce cas faire un test à chaque fois pour voir si une virgule est présente dans la saisie.

Un truc dans ce style :

Private Sub TextBox0_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If Not IsNumeric(Chr(KeyAscii)) And Chr(KeyAscii) <> "." Then

KeyAscii = 0

End If

If instr(textbox0.seltext,".")>0 then

if not Virgule then virgule=True else KeyAscii=0

else

virgule=false

End If

End Sub

Citer

Rejoindre la conversation

Vous pouvez publier maintenant et vous inscrire plus tard. Si vous avez un compte, connectez-vous maintenant pour publier avec votre compte.
Remarque : votre message nécessitera l’approbation d’un modérateur avant de pouvoir être visible.