Bonjour tout le monde !

Petit soucis concernant les chiffres, quand j'initialise un nombre à la valeur 500.01 j'obtiens deux nombres :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
dim nombre as single
nombre = 500.01
nombre = round(nombre,2) 'essayer pour fixer le problème mais non
sheets("A").Range("A1").value =nombre 'la valeur dans la cellule est 500.01001
msgbox nombre 'me retourne 500.01
'... mtn si je fais un if avec nombre
if nombre = 500.01 then
'marche
end if
if nombre = 500.01001 then
'marche aussi
end if
C'est sympa comme concept mais pour moi 500.01 <> 500.01001. J'ai des bugs sur certains if et tableau dans mon code à cause de ça ou du moins c'est ce que je crois.

Qu'est-ce que je fais de faux ?