Chers tous,

Un détail m'échappe. Pourquoi lorsque je fais :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim X As Single
For X = 20 To 40 Step 0.02
    Range("D" & Lig) = X
Next X
Les valeurs renvoyées dans les cellules correspondent à : 20.0200004577636 au lieu de 20.02 ?

Comment faire pour remédier à ce problème ?

Pour info j'ai une solution qui ne me plaît que moyennement :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim X As Integer
For X = 2000 To 4000 Step 2
    Range("D" & Lig) = X/100
Next X
Merci de votre aide, belle soirée à tous