ChangeFormat of column from English decimal system with a dot to French System with a ,

Hi,
I am have been trying to create a macro to change the fomat of my excel sheet from an english(NORMAL!!!) decimal system to a french decimal system for use by a partner company in France. Usually I will search and replace the " . " by " ," in excel. I recorded that in a macro however Strange numbers were returned when I tried to execute it. Right now my regional setting are set to "France".

Can you help me. Here is a sample of the file I need to convert.and the code I recorded. I,really,would appreciate your help.

Columns("D:D").Select
    Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

Thank a lot in advance
Raj.