Suuprimer les arrondis de Cdbl

sroz Messages postés 9 Date d'inscription jeudi 3 mars 2005 Statut Membre Dernière intervention 19 juin 2007 - 23 avril 2007 à 14:23
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 - 24 avril 2007 à 01:41
Bonjour à tous,

J'ai une appli dans laquelle je saisis une valeur que je veux convertir en pourcentage (division par 100). Pour cela je fais :

pourcent = Cdbl(valeur) / 100

Je voudrais garder exactement la précision saisie et Cdbl fait des modifications.
Par exemple, si je saisis 999999999,999999999, je récupère 10000000.
Si je saisis 9999999,123456789, j'obtiens 9999999,12345679. Par contre si je saisis 999999,123456789, je garde bien la même valeur.

Quelqu'un sait-il d'où peuvent venir ces différences et ce qu'il y a à faire pour les résoudre ?

2 réponses

drikce06 Messages postés 2237 Date d'inscription lundi 29 mai 2006 Statut Membre Dernière intervention 29 mai 2008 11
23 avril 2007 à 14:25
Salut! Essaye de passer en Long! ça doit être à cause de la portée de double!

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:
0
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 33
24 avril 2007 à 01:41
la précision du Double c'est 15 chiffres maxi
 au-dessus il y a forcément un arrondi
la solution c'est d'utiliser le décimal ou de travailler en chaîne
t'es bien sûr que c'est un pourcentage ?

    Dim valeur As Variant
   
    valeur = CDec("999999999,999999999")
    MsgBox valeur / 100

Daniel
0