Comment formater une textbox d'un formulaire

VBA
2

Bonjour,

A tester

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If InStr("1234567890,", Chr(KeyAscii)) = 0 Then KeyAscii = 0 :Beep
End sub

Le textbox ne peut prendre que les valeur de 0 à 9, ainsi que la virgule, sinon on entend un Beep dés que la touche n’est pas bonne

2 « J'aime »