Discussion :

[petibonohm]

bonsoir,

dans un textbox j'entre une quantité de mon stock

je peux rentrer un chiffre positif (incrémente mon stock)
ou un chiffre négatif (décrémente mon stock)

mais je ne veux pas que ça tape [-2-] ou tout autre composé qui serait pas logique

seul les caractères suivant sont autorisé (les autres sont verrouillé) 1234567890-

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
 
'saisie uniquement de chiffre TEXTBOX2
 
If InStr("-0123456789", Chr(KeyAscii)) = 0 Then
KeyAscii = 0
End If
 
End Sub

si on tape une "-", il est impossible d'en taper un autre
si on tape un chiffre on ne peut plus taper de "-"

Une idée pour traduire ça ???

[ucfoutu]

Bonjour,

Bien que je ne procèderais personnellement jamais ainsi pour contrôler une saisie !...

Ton code actuel, déjà, est assez curieux car il permet de saisir un - en plein au milieu (exemple 123-12) !!!

Si tu tiens à ce genre de code (qui t'expose à tous les risques du fait de manoeuvres possibles de l'utilisateur), fais au moins ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
  If InStr("-0123456789", Chr(KeyAscii)) = 0 Or (Text1.SelStart > 1 And Chr(KeyAscii) = "-") Then
    KeyAscii = 0
  End If

[petibonohm]

Ton code actuel, déjà, est assez curieux car il permet de saisir un - en plein au milieu (exemple 123-12) !!!

je suis d'accord avec toi, c'est ce que je veux bloquer...

si je tape un "-", il ne peut l'être qu'en première position, sinon pas possible...

[ucfoutu]

Et alors ?
Tu as vu mon message précédent et tu as essayé ?

Avertissement, toutefois : ta méthode, même ainsi corrigée, ne te met certes pas à l'abri de certaines manoeuvres de l'utilisateur, à commencer par les copier/coller ...

[petibonohm]

oué oué j'ai bien essayé...

mais quand je teste ton script ça plante et que je tape un caractère autorisé :
Erreur d'éxécution '424':
Objet requis

je comprends pas...

[ucfoutu]

oué oué j'ai bien essayé...

mais quand je teste ton script ça plante et que je tape un caractère autorisé :
Erreur d'éxécution '424':
Objet requis

je comprends pas...

Moi non plus...
ou tu as fait une erreur de copie, donc, ou tu utilise finalement un autre évènement que Keypress !!!!
Car j'ai beau essayer, je ne parviens pas à cette erreur...

Euh ....

Rassure-moi donc : tu as bien pensé (j'espère ) à changer Text1 par le nom que toi, tu as donné à ta textbox ?????