Discussion :

[gege2061]

Bonjour,

Access est tout simplement incapable d'arrondir un champ de type réel simple à deux décimales :

Code x :

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

1
2
3
4
5
6
-------------
|   value   |
-------------
| -44,51234 |
|  45,54124 |
-------------

Code :

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

SELECT ROUND(valeur,2) FROM test;

Code x :

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

1
2
3
4
5
6
---------------------
|       value       |
---------------------
| -44,5099983215332 |
|  45,5400009155273 |
---------------------

Une idée d'où peut venir le problème ?

[fgiambelluco]

Bonjour
Depuis la version Access 2.0 (pas de fonction arrondi), j'ai pris l'habitude de créer ma propre fonction:

Code :

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

1
2
3
Function arrondir(valeur, nbdec)
    arrondir = Int(valeur * (10 ^ nbdec) + 0.5) / 10 ^ nbdec
End Function

En fait j'ai jamais compris comment access faisait ces calculs

[nico84]

Bonjour,

Je pense que le choix "réel simple" ne concerne que les champs stockés dans les tables et le variables déclarées explicitement. Sinon par défaut Access met des réels doubles partout.

Dans la requête

Code :

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

SELECT ROUND(valeur,2) FROM test;

il n'y a pas de déclaration explicite des variables, il est donc probable qu'à un moment access fait une conversion malheureuse des valeurs depuis un réel simple vers un réel double

Comme l'espace disque est de moins en moins cher je ne mets plus que des réels doubles partout et je n'ai plus ce type de problème

[fgiambelluco]

Bonjour

Bonjour,

Je pense que le choix "réel simple" ne concerne que les champs stockés dans les tables et le variables déclarées explicitement. Sinon par défaut Access met des réels doubles partout.

Dans la requête

Code :

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

SELECT ROUND(valeur,2) FROM test;

il n'y a pas de déclaration explicite des variables, il est donc probable qu'à un moment access fait une conversion malheureuse des valeurs depuis un réel simple vers un réel double

Comme l'espace disque est de moins en moins cher je ne mets plus que des réels doubles partout et je n'ai plus ce type de problème

Histoire de ne pas mourir idiot j'ai fait des tests

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub test()
    Dim v1 As Single
    Dim v2 As Double
    Dim r1 As Double
    Dim r2 As Double
    v1 = 45.54124
    v2 = 45.54124
    r1 = Round(v1, 2)
    r2 = Round(v2, 2)
    Debug.Print "r1: " & r1 & "-- r2 :" & r2
    'résultat
    'r1: 45,5400009155273-- r2 :45,54
    ' ???
End Sub

Maintenant je sais d'où ça vient. Merci nico84

Edit encore plus bizarre

Code :

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

1
2
3
4
5
6
7
8
9
10
Sub test()
    Dim v1 As Single
    Dim r1 As Double
    v1 = 45.54124
    r1 = v1
    Debug.Print "r1: " & r1
    'résultat
    'r1: 45,5412406921387
    ' ???
End Sub

[gege2061]

il n'y a pas de déclaration explicite des variables, il est donc probable qu'à un moment access fait une conversion malheureuse des valeurs depuis un réel simple vers un réel double

Effectivement, une conversion forcée en double résout le problème :

Code :

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

SELECT Round(CDbl(valeur),2) FROM test;

[Arkham46]

bjr,

Les types de données single et double sont des approximations :
http://msdn.microsoft.com/fr-fr/library/ae382yt8.aspx

Pour stocker précisémment un nombre decimal il faut utiliser le type de données currency (decimal)

[nico84]

Edit encore plus bizarre

Code :

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

1
2
3
4
5
6
7
8
9
10
Sub test()
    Dim v1 As Single
    Dim r1 As Double
    v1 = 45.54124
    r1 = v1
    Debug.Print "r1: " & r1
    'résultat
    'r1: 45,5412406921387
    ' ???
End Sub

Ce n'est bizarre que pour un matheux
Quand access met une valeur issue d'un réel simple dans un réel double il ajoute ce qu'il veut derrière au petit bonheur des conversions binaires

[Arkham46]

Quand access met une valeur issue d'un réel simple dans un réel double il ajoute ce qu'il veut derrière au petit bonheur des conversions binaires

Non je crois qu'il ne rajoute rien...et surtout il n'y a pas de hasard.
Après conversion en double, on a la même chose que le single dans la mémoire :

Single est stocké ainsi : 01000010001101100010101000111011
exposant => (128+4) - 127 = 5
mantisse => 1 + 1/2^2 + 1/2^4 + ... + 1/2^23 = 1.42316377162933
Double est stocké ainsi : 0100000001000110110001010100011101100000000000000000000000000000
exposant => (1024+4) - 1023 = 5
mantisse => 1 + 1/2^2 + 1/2^4 + ... + 1/2^23 = 1.42316377162933

45.54124 est donc approximé par :
1.42316377162933 * 2^5 = 45.5412406921386

Que ce soit en Single ou en Double.