Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
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" wrote:
Bonsoir Dans un textbox, je souhaite que le premier caractère saisi soit obligatoirement un 1 ou un 2 Je vous remercie
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" <mi...@club-internet.fr> wrote:
Bonsoir
Dans un textbox, je souhaite que le premier caractère saisi soit
obligatoirement un 1 ou un 2
Je vous remercie
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" wrote:
Bonsoir Dans un textbox, je souhaite que le premier caractère saisi soit obligatoirement un 1 ou un 2 Je vous remercie
Milan DESHAYES
Merci beaucoup Milan
"JB" a écrit dans le message de news:
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" wrote:
Bonsoir Dans un textbox, je souhaite que le premier caractère saisi soit obligatoirement un 1 ou un 2 Je vous remercie
Merci beaucoup
Milan
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1190057520.116020.16050@g4g2000hsf.googlegroups.com...
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" <mi...@club-internet.fr> wrote:
Bonsoir
Dans un textbox, je souhaite que le premier caractère saisi soit
obligatoirement un 1 ou un 2
Je vous remercie
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" wrote:
Bonsoir Dans un textbox, je souhaite que le premier caractère saisi soit obligatoirement un 1 ou un 2 Je vous remercie