Change Dot to Comma

[MrThor]

Hi

I want to find all my dots in my excel sheet and replace them with Comma. I used the macro recorder to try to find a way and got the code below. However it doesnt work, if I have a number like 12345.6789 it will turn to 123456789 after the macro. Anyone knows how to fix it?

    Cells.Replace What:=".", Replacement:=",", LookAt:=xlPart, SearchOrder _
        :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

 

[James006]

Hi,

You can test Chr(46) and Chr(44) to replace "." and ","

Hope this will help

 

[Repush]

replace is a string operator . .
tested with '12345.6789 your code works: result '12345,6789
what is the source? manual typed numbers or imported?

 

[MrThor]

its both imported and typed.

 

[Repush]

[B3].Value = Replace([B3], ".", ",")
strange things happen here . . . cell formatting has influence