Van komma naar Punt

[krkl]

Ik heb een macro opgenomen die getallen kopieert naar een andere kolom, hier vervolgens waarde en tekst van maakt en de komma vervangt door een punt. Als ik de makro echter laat draaien gebeurt alles wat ik wil behalve met omzetten van de komma naar punt. Doe ik alle stappen buiten de macro om werkt het wel. Kan iemand mij op weg helpen met de macro.

Groeten krkl

 

[JEC.]

=substitueren(j2;",";".")

of

Sub j()
 For Each cl In Range("J2:J14")
    cl.Value = Replace(cl.Value, ",", ".")
 Next
End Sub

of 

Sub jv()
[J2:J14] = [substitute(J2:J14,",",".")]
End Sub

 

[snb]

Sub M_snb()
   sheet1.columns(10).replace ",",".",2
End sub

 

[krkl]

Dank voor de oplossingen, die oplossing van JV werkt in ieder geval.