Calculatrice en VBA

job75

XLDnaute Barbatruc

• 14 Février 2016

• #31

Re : Calculatrice en VBA

Re,

Lone-wolf à dit:

Heuuuuuu! 🙄 laetitia, tu as envie de perdre de l'argent ??? 15Fr,25ct + 15Fr,25ct Pour moi ça fait 30Fr et 50 ct et non 30Fr et 5ct si tu vois ce que je veux dire.

Cliquez pour agrandir...

Qu'est-ce que tu vas chercher Lone-wolf ?

D'abord aucune calculatrice n'a de format monétaire.

Ensuite chacun sait sait bien que 30,5 ce n'est pas la même chose que 30,05 c'est tout bête ça.

A+

 

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 14 Février 2016

• #32

Re : Calculatrice en VBA

Re job,

c'est juste ce que tu dis, mais si on suis la logique du calcul 25+25= 50 et non 5; l'unité logiquement dois être ajoutée, même si c'est 0.


A+ 😎

 

Dernière édition: 14 Février 2016

Vote positif 0 Vote négatif

grisan29

XLDnaute Accro

• 14 Février 2016

• #33

Re : Calculatrice en VBA

bonsoir lone-wolf

chez moi ta calculatrice a un bug je rentre 15.35 et fait +elle bug avec une erreur 13 a cette ligne

Code:

valeur = txtResultat.Value

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 14 Février 2016

• #34

Re : Calculatrice en VBA

Re,

Lone-wolf à dit:

la décimale logiquement dois être ajoutée, même si c'est 0.

Cliquez pour agrandir...

Eh bien non tu n'es pas logique, aucune calculatrice ne formate le nombre de décimales.

A+

 

Dernière édition: 14 Février 2016

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 14 Février 2016

• #35

Re : Calculatrice en VBA

Re grisan,

je ne comprend pas, chez moi j n'ai pas ce problème. Et si tu ajoute On Error Resume Next qu'est-ce que ça donne?


A+😎

 

Vote positif 0 Vote négatif

grisan29

XLDnaute Accro

• 14 Février 2016

• #36

Re : Calculatrice en VBA

re,Lone-wolf
merci c'est beaucoup mieux mais le bug est reporté au bouton égal, et je n'ai pas rajouté "option explicit" pour te le dire rassure toi
cela se passe juste qu'avec les chiffres a virgules les autres non

 

Dernière édition: 14 Février 2016

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 14 Février 2016

• #37

Re : Calculatrice en VBA

job75 à dit:

Eh bien non tu n'es pas logique, aucune calculatrice ne formate le nombre de décimales.

Cliquez pour agrandir...

Ce n'est pas moi qui ne suis pas logique, mais les calculatrices. Si on arrive a calculer 25+26, en suivant la logique d'une calculatrice on devrais obtenir 5 et non 51. Qu'on le veuille ou non 0 est un nombre comme tous les autres et il devrais être obligatoirement rajouter. Ceci ne te rappelle rien "00101000011001000010101", tu vois ce que je veux dire? Ceci est juste pour rappeler que le 0 est important aussi, on ne peux pas le dénigrer juste parce qu'il est en unité(0.50) 5= décimale 0= unité.


A+ 😎

 

Dernière édition: 14 Février 2016

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 14 Février 2016

• #38

Re : Calculatrice en VBA

Re grisan,

Dans le bouton égal, essaie de rajouter Application.DisplayAlerts = False pour voir.


A+ 😎

 

Vote positif 0 Vote négatif

grisan29

XLDnaute Accro

• 14 Février 2016

• #39

Re : Calculatrice en VBA

re, lone-wolf
avec ou sans c'est pareil le bug est le même , ci joint aperçu et je fais rien que l'essayer, peut etre est ce du a
windows10 64 bits et office 2013 32 bits, il faudrait l'avis d'un autre pour voir

 

Pièces jointes

• bugsurligne.jpg

  106.4 KB · Affichages: 44
• codebug.jpg

  77.4 KB · Affichages: 36

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 14 Février 2016

• #40

Re : Calculatrice en VBA

Re grisan,

j'ai bien Windows 64bits et Office Pro 2010 32bits. Toi c'est quoi comme Windows(32bits ???).


A+ 😎

 

Vote positif 0 Vote négatif

grisan29

XLDnaute Accro

• 15 Février 2016

• #41

Re : Calculatrice en VBA

bonjour lone-wolf
comme je l'ai dit windows 10 64 bits

 

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 18 Février 2016

• #42

Re : Calculatrice en VBA

Bonjour grisan,

alors avec Office 2013, il faut peut-être écrire autrement, je ne sais pas.

Essaie en enlevant Currency pour valeur et valeur1 et ensuite tu mets valeur = Val(txtResultat.Value), sans conviction.



A+ 😎

 

Dernière édition: 18 Février 2016

Vote positif 0 Vote négatif