Discussion :

[Daniel.C]

Bonjour,

Un utilisateur me pose une colle sur les variables de type single et currency. Avec la valeur 1500.15678 en B2 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Dim ValMonetaire As Currency, ValSingle  As Single
 
ValMonetaire = Cells(2, 2).Value
ValSingle = Cells(2, 2).Value
 
Cells(5, 2).Value = ValMonetaire
Cells(7, 2).Value = ValSingle

je récupère 1500.15673828125 en B7 (format standard et barre de formule)
1500.16€ en B5 (format monétaire 2 décimales et 1500.16 dans la barre de formule)

Avez-vous une explication ?

Merci d'avance.

[Marc-L]

Bonjour,

j'obtiens le même résultat en direct sans les variables - inutiles - alors c'est le résultat de la conversion monétaire.

Pour de la précision utiliser   CDbl   …

___________________________________________________________________________________________________________

Je suis Paris, Barcelone, London, Manchester, Egypte, Stockholm, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[Daniel.C]

Bonjour,

Oui si le format est déjà au format monétaire. Si le format est au format standard, pourquoi une valeur à 5 décimales en entrée donne-t-elle un résultat à deux décimales ? Pour le type Single, comment expliquer le résultat ?

Merci d'avance.

Daniel

[Marc-L]

Non, c'est dû au format de conversion, voir les explications déjà présentes sur le net et même peut-être déjà sur ce forum.

Aucun souci en format Double …

[Daniel.C]

Aucun souci en format Double

Les variables de type Currency sont stockées sous la forme de nombres de 64 bits (8 octets).
Ce type de données est utilisé dans les calculs monétaires ou dans les calculs à virgule fixe pour lesquels une grande précision est requise

Donc plus sûr que le format Double

[eriiic]

Bonjour,

et pour compléter Currency est en Entier à virgule fixe 4 décimales (d'où la précision supérieure à un Double, celle d'un entier mais avec des décimales limitées) dont 2 d'affichées, les 2 suivantes sont justement là pour s'affranchir des problèmes de pertes de précisions dues aux conversions.
Avec on a des centimes exacts ce qui est leur but, contrairement à un stockage avec mantisse et exposant (réel flottant)
eric