Replace point with comma - Numeric value error

Hi everyone,
I have a column with numeric values ​​that, to set the decimals, have the dot rather than the comma.
To replace all the points with commas, I inserted this part into a macro.

The macro therefore replaces all values, the problem is that the values ​​of these cells are not read as numeric values ​​(which can be added together).
To make them become numeric value, so you can add them up, I have to click on each cell.
At that point the content of the cell automatically moves from left to right and these values ​​become summable between them.

Is there a way to avoid this "click" step on each cell? I hope I explained myself. Thank you !

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