isnumeric

[buromania]

Bonsoir forum

Existe t'il un moyen simple pour

If IsNumeric(TextBox6) Then TextBox6 = ''

si je rentre une lettre puis des chiffres, la cellule n'est pas éffacée

bonne soirée

 

[justine]

bonsoir le forum, buromania
il est normal que ta textbox ne soit pas effacée car tu rentres une donnee alphanumerique donc il ne la vide pas.
ton code dit:
si la valeur de la textbox6 est numerique alors vider la textbox6
or en entrant une valeur alphanumerique, nous ne sommes pas dans la condition.
apres tout depend de ce que tu veux faire.

bon courage
justine

 

[ziopizza]

Bonsoir Buromania,Justine,
Pour avoir que des chiffres essaye ça,
If Not IsNumeric (textbox6) Then textbox6=''
Salut
Yves

 

[buromania]

Bsr justine, ziopizza le forum
je cherche à rentrer des valeurs alphabétique et si une valeur numérique est saisie le textbox se vide
bonne nuit à tous

 

[AV]

Ave,


''...je cherche à rentrer des valeurs alphabétique et si une valeur numérique est saisie le textbox se vide...''

Pour empêcher la saisie de valeurs numériques :

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii › 47 And KeyAscii ‹ 58 Then
KeyAscii = 0
End If
End Sub

AV [aaa]

 

[buromania]

bonjour AV, le Forum

Merci de ta réponse et bonne journée à tous