Bonsoir,

Je ne parviens pas à afficher le résultat d'un calcul avec une précision à 2 décimales. Le résultat affiche un nombre rond. Comment puis-je procéder?

Le code que j'utilise :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Function TotAchat(Q, P As Integer)
'Prix total de l'achat de part(s)
Dim R As Integer
    quantity = Q
    price = P
    result = R
        result = quantity * price
    TotAchat = result
End Function
Dans une feuille Excel, la cellule contient la formule dont le format est "Nombre, 2 décimales"

=TotAchat(C11;D11)

Le résultat affiche (par ex) : 100,00 au lieu de 100,25 (valeur réelle)

Merci de m'aider
A+