Remplacement point par virgule avec VBA

Bonjour,

Pour ceux qui connaissent vba excel,

j'ai fait une macro très simple qui sélectionne feuille et qui remplace les points par des virgules,

quand on le fait "à la main" (Edition/Remplacer, etc) cela marche très bien.

Par contre avec la macro, qui décrit en effet l'action décrite ci-avant, ne marche pas.

Par exemple pour les numéro du type : 1.27365e+006
la macro les transforme en : 127365000000

voila la macro, elle est très simple :

Sub pv3()

Cells.Select
Application.CutCopyMode = False
Selection.NumberFormat = "General"
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False

End Sub


Je vous remercie d'avance pour votre réponse