Blocage avec calcul et poucentage avec décimal

Bonjour à tous

Depuis le matin, j'essaie d'arriver au bon résultat pour un calcul avec pourcentage à décimaux mais je ne suis pas arrivé au résultat souhaité.

Alors je m'adresse à vous pour une aide et je vous remercie d'avance

Le problème c'est que j'ai des calculs avec des pourcentages à décimaux par exemple 5.2% / 7.32% / 8.39% et etc. . . .

Mais le calcul ne prend pas en compte le décimal d'un pourcentage donné pour me renvoyer le résultat exact

Quand par exemple je veux calculer (un Nombre x 5.32%), le résultat obtenu est celui du (Nombre x 5%), c-à-d le pourcentage est arrondi à l'inférieur

j'ai essayé pas mal de combinaisons mais sans résultat

Voici le code des Textbox concernés du calcul :

Private Sub TextBox31_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Me.TextBox31 = Format(Val(Me.TextBox31) / 100, "0.000%")
Me.TextBox14 = Format((Val(Replace(Me.TextBox26, ",", ".")) * Val(Me.TextBox31) / 100), "0.000")
End Sub

Merci à vous.

Bonjour,

Me.TextBox14 = Format(Val(Replace(Me.TextBox26, ",", ".")) * Val(Replace(Me.TextBox31, ",", ".")) / 100, "0.000")

attention aux parenthèses...

Bonjour MFerrand

J'ai déjà essayé cette formule mais elle me renvoie :

(Erreur 13 / Incompatibilité de type)

Vérifie tes données ! Val renvoie un type Double, et Replace si elle ne trouve pas de virgule ne remplacera rien par un point tout simplement. S'il y a un problème de type de données, il est dans les données qu'on ne voit pas !

Rechercher des sujets similaires à "blocage calcul poucentage decimal"