Bonjour,
Voici mon code :
Ceci me permet dans une textbox (nommée Masse) de n'entrer que des nombres.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Private Sub Masse_Change() 'Formatage text box => chiffres uniquement avec la virgule valide(décimale) On Error Resume Next If Not IsNumeric(Right(Masse, 1)) And Right(Masse, 1) <> "," And Right(Masse, 1) <> "." Then MsgBox "Le caractere saisi n'est pas valide" Masse = Left(Masse, Len(Masse) - 1) End If End Sub
L'inconvénient c'est qu'une textbox apparaît dès que je fais une correction (backspace ou suppr) dans cette dernière.
Je ne vois pas comment faire pour empêcher la génération de ces msgbox dès que j'appuie sur backspace ou suppr.
Une idée ?
Merci pour votre aide,
Partager