Saisie obligatoire dans textbox

Le
Milan DESHAYES
Bonsoir
Dans un textbox, je souhaite que le premier caractère saisi soit
obligatoirement un 1 ou un 2
Je vous remercie
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
JB
Le #4746331
Bonsoir,

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Len(Me.TextBox2) < 1 Then
If InStr("12,", Chr(KeyAscii)) = 0 Then
KeyAscii = 0
Beep
End If
End If
End Sub

JB


On 17 sep, 21:02, "Milan DESHAYES"
Bonsoir
Dans un textbox, je souhaite que le premier caractère saisi soit
obligatoirement un 1 ou un 2
Je vous remercie


Répondre en citant
Milan DESHAYES
Le #4746271
Merci beaucoup
Milan

"JB"
Bonsoir,

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Len(Me.TextBox2) < 1 Then
If InStr("12,", Chr(KeyAscii)) = 0 Then
KeyAscii = 0
Beep
End If
End If
End Sub

JB


On 17 sep, 21:02, "Milan DESHAYES"
Bonsoir
Dans un textbox, je souhaite que le premier caractère saisi soit
obligatoirement un 1 ou un 2
Je vous remercie


Répondre en citant
Publicité
Poster une réponse
Anonyme