Bonjour

J'ai tapé ce code mais ne marche pas comme il faudait !

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
Private Sub TextBox_TelephoneFixe_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    If Not (KeyAscii > 37 And KeyAscii < 56) Then             'n'apparait uniquement que les chiffres de 0 à 9 et le /
    KeyAscii = 0
    End If
End Sub

Un petit coup de main me serai utile et je comprendrais mieux le dysfonctionnement


merci