Ecart décimal entre VBA et Excel

Mathieulai -  
Bonjour, j'ai un écart entre le résultat retourné par une formule Excel d'un côté et la même en VBA de l'autre. Je ne sais pas d'où cela vient et n'arrive pas à le résorber.

Voici le fichier : http://dl.free.fr/gEn4FKCOG

Voici le code VBA (résumé à la partie en cause) :

Function Prod(Remise As Single, Rs As Single) As Single
Prod = Remise * (1 - Rs)
End Function

Remise = 0,15
Rs = 0,10

VBA => Prod = 0,135000005364418
Excel => 0,135

Et dans la suite du code j'arrondis tout ça donc j'ai des écarts.

Merci pour votre aide.

1 réponse

  1. michel_m Contributeur
    bonjour
    le type single pose souvent des pb lorsqu'on le rentre des calculs

    si tu passes en double tu obtiens bien la m^ chose qu'en XL 

    Function Prod(Remise As Double, Rs As Double) As Double
    --
    Michel
    0
    1. Mathieulai
      Merci Michel, par contre le type de variable Double (8 bytes) pèse le double (par définition) que Single (4 bytes) et des variables j'en ai beaucoup dans mon code. Mais si je n'ai pas le choix.
      0
    2. michel_m Contributeur
      @Mathieulailorsque la fonction est terminée, le type des variables est annulé
      0