Replace komutunu belirli hücrelere uygulamak

[xnanx]

Herkese merhaba,

Private Sub CommandButton1_Click()
MsgBox (Replace(TextBox1.Text, ",", "."))
End Sub

Yukarıdaki gibi bir kod dizinim var bu şekilde exceldeki nokta virgülleri otomatik olarak değiştiriyorum..

Fakat yapmak istediğim bir replace daha eklemek ve bunu sadece excelde iki sütüna uygulamak.

Söyleki; C ve D sütununda bulunan virgülleri silmek diğer Replace ise noktaları virgüle çevirmek. bu makroyuda bir buton ile kullanmak.

 

[Ömer]

Merhaba,

Bir örnek. Virgülleri noktaya çevirir.

[C:D].Replace ",", "."

.