OVH Cloud OVH Cloud

Problème produit entre 2 textbox.

8 réponses
Avatar
j0b
Bonjour à tous, je fais un produit entre 2 textbox, l'une à pour valeur 1960
et l'autre 10% mais au final dans ma cellule je retrouve 19600, comment je
peux déterminer que la textbox doit recevoir un pourcentage ? merci

8 réponses

Avatar
AV
Avec les plus fortes réserves sur ce type de saisies....

Si tu saisis 10% en Textbox1 et 1960 en Textbox2 :

MsgBox TextBox2 * ((Left(TextBox1, InStr(TextBox1, "%") - 1) / 100))

AV
Avatar
MichDenis
Pour les smickblick ....

on pourrais remplacer Left(TextBox1, InStr(TextBox1, "%") - 1) par Val(Textbox1) c'est moins
isotérique !!!
;-)

P.S.-
Je laisse tomber les remarques sur les trucs si les nombres possèdent un séparateur décimal ...





"AV" a écrit dans le message de news:

Avec les plus fortes réserves sur ce type de saisies....

Si tu saisis 10% en Textbox1 et 1960 en Textbox2 :

MsgBox TextBox2 * ((Left(TextBox1, InStr(TextBox1, "%") - 1) / 100))

AV
Avatar
AV
on pourrais remplacer Left(TextBox1, InStr(TextBox1, "%") - 1) par
Val(Textbox1) c'est moins
isotérique !!!


Pas si sur car ... (voir réponse suivante)

Je laisse tomber les remarques sur les trucs si les nombres possèdent un
séparateur décimal ...


Absolument aucun souci chez moi (séparateur décimal = le point) avec ma syntaxe
!
Par contre "MsgBox Val(TextBox1)" gros soucis !
;-)

AV

Avatar
MichDenis
| on pourrais remplacer Left(TextBox1, InStr(TextBox1, "%") - 1) par
| Val(Textbox1) c'est moins isotérique !!!

| Je laisse tomber les remarques sur les trucs si les nombres possèdent un
| séparateur décimal .

Pas si sur car ... (voir réponse suivante)
| Absolument aucun souci chez moi (séparateur décimal = le point) avec ma syntaxe !
| Par contre "MsgBox Val(TextBox1)" gros soucis !

Voilà un exemple frappant de mauvaise volonté !!!

Mais comme tu insistes à parler de séparateur décimale,
peut être peux=tu expliquer pourquoi il y a plantage que dans cette situation :

Si textbox 1= 10% Val(Textbox1) = 10 -> Ok
Si textbox1 = 10.% Val(Textbox1) = 10 -> Ok
Si textbox1 = 10.25 Val(Textbox1) = 10.25 -> Ok
Par contre :
Si textbox1 = 10.2% --> Plantage de la fonction Val(Textbox1)

Comme l'aide d'excel est silencieuse sur la relation entre % et la fonction val(),
J'accuse Microsoft de se traîner les pieds à résoudre de "bug" Et AV de bien
vouloir assurer la pérennité de ce bug plutôt que de le dénoncer aux autorités
compétentes ...;-)))
Avatar
AV
Comme l'aide d'excel est silencieuse sur la relation entre % et la fonction
val(),
J'accuse Microsoft de se traîner les pieds à résoudre de "bug" Et AV de bien
vouloir assurer la pérennité de ce bug plutôt que de le dénoncer aux autorités
compétentes ..


Je transmets ta requète à qui de droit et je ne manquerais pas de te tenir
informé de .... la non-réponse de... "qui tu sais" !
;-)
AV

Avatar
LE TROLL
Bonjour,

Une textBox c'est une boîte à texte, ça ne sait pas en l'état ce que ça
contient...
A toi d'utiliser la bonne formule ensuite pour ton calcul, en prenant le
texte...
Mais... d'après ce que tu dis, je mettrais plutôt 2 listBox...

--
Merci beaucoup, au revoir et à bientôt :o)
------
Site éditeur MES ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site de MES LOGICIELS
http://irolog.free.fr
mon adresse EMail
http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
"j0b" a écrit dans le message de news:

Bonjour à tous, je fais un produit entre 2 textbox, l'une à pour valeur
1960
et l'autre 10% mais au final dans ma cellule je retrouve 19600, comment je
peux déterminer que la textbox doit recevoir un pourcentage ? merci


Avatar
LE TROLL
Ah, BIS, je n'avais as compris que c'était du mono-ligne, alors en
décomposant:

text160
text2%

dim t1 as long
dim trans as string
dim t2 as long
dim pour as long
dim cal
dim res as long
t1 = val(text1)
text2=trim(text2)
trans = Mid(text2, 1, 2)
t2 = val(trans)
if t2 <> 0 then: pour = (t1 / 100) * t2
cal = t1 + pour

--
Merci beaucoup, au revoir et à bientôt :o)
------
Site éditeur MES ROMANS édités
http://www.manuscritdepot.com/a.joseph-attila-pusztay.1.htm
Site de MES LOGICIELS
http://irolog.free.fr
mon adresse EMail
http://irolog.free.fr/ecrire/index.htm
------------------------------------------------------------------------------------
"j0b" a écrit dans le message de news:

Bonjour à tous, je fais un produit entre 2 textbox, l'une à pour valeur
1960
et l'autre 10% mais au final dans ma cellule je retrouve 19600, comment je
peux déterminer que la textbox doit recevoir un pourcentage ? merci


Avatar
MichDenis
Je transmets ta requète à qui de droit et je ne manquerais pas de te tenir
informé de .... la non-réponse de... "qui tu sais" !
;-)
AV


Tous mes remerciements t'accompagnent pour ta démarche.