Pb macro edition remplacer

bonjour
j'ai un pb que je n'arrive pas a resoudre.
Sur un fichier, lorsque j'effectue la manip edition remplacer les "." par "," pas de probleme ca marche.
Cependant, quand je l'integre à une macro

Code:

---

1 2	Columns("d:d").Select Selection.Replace What:=".", Replacement:=","

---

il repere bien les "," mais il effectue un décalage
exemple
20.00000 devient par la macro 2000000
sachant qu'en passant par le menu edition remplacer je n'ai pas ce pb
merci de m'aider

as tu changer le format de la cellule?

oui j'ai changé le format de la cellule avec "0.00" mais rien ny fait...