Calcul dans Userform

[Laurent]

Bonjour à tout le forum,

Un petit problème à vous soumettre en ce début de semain...

Dans 2 textbox je remplis des données uniquement chiffrées et je voudrais que dans un label, s'affiche en temps réel le résultat d'un calcul impliquant ces 2 chiffres.

Mon problème est donc le suivant:

1) Comment faire pour qu'aparaisse le résultat du calcul dans le label

2) Comment faire en sorte que si je change un des 2 chiffres le résultat du nouveau calcul s'affiche automatiquement dans le label

Pour plus de clareté je vous joint un fichier exemple.

Merci d'avance à ceux qui pourront m'aider, bonne journée à tous,

A++
Laurent

 

[Pascal76]

Bonjour

Regarde si cela te convient en modifiant peut-être tes arrondis pour tes calculs

Pascal

 

[david2]

Bonjour

est- ce que le fichier joint correspond à ta demande?

@

 

[Laurent]

Bonjour Pascal et David,

Quelle rapidité dans les réponses.... En tout cas merci car vous avez tous les deux répondus parfaitement à ma question.
Un petit bonus tout de même à David avec l'arrondi du calcul.

Merci à tous les deux en tout cas pour vous être penché sur mon problème

Bonne journée à vous deux et à ceux qui lisent ce fil

A++
Laurent

 

[Laurent]

Rebonjour,

Je me permet de revenir vers vous car j'ai constaté un petit problème avec le calcul.

Quand j'insère un chiffre dans la textbox1 puis dans la textbox2, le calcul se fait normalement

Mais si je laisse un chiffre dans la textbox2 et que j'efface le contenu de la Textbox1, j'ai un message d'erreur car j'ai une division par zéro ce qui est normal.

J'aurais voulu savoir si vous aviez une solution pour éviter ce genre d'erreur.

Il faut noter que j'ai utilisé la version de David car elle gère le valeures décimales.

Voila, merci encore par avance et à bientôt

A++
Laurent

 

[david2]

Rebonjour

Bizarre, car le calcul ne se fait que si net <>0:

If Val(net) <> 0 Then
Label4.Caption = Round(((1 - (brut / net)) * 100), 2)
End If

après test on voit bien que le calcul ne se fait pas (chez moi).

??Plus infos??

@

 

[Laurent]

Rebonjour,

Tu as tout à fait raison mais en rédigeant l'exemple j'avais inversé brut et net, ce que j'ai corrigé par la suite mais sans changé val(net)... d'où l'erreur.

J'ai donc modifié le code en mettant val(brut) au lieu de val(net) et tout fonctionne parfaitement.

Merci en tout cas de m'avoir éclairé et désolé de t'avoir dérangé pour une erreur d'étourderie....

MERCI encore et A++

Laurent