VBA da virgül sorunu

[TİKOS]

arkadaşlar, ekteki dosyamda Satış Maliyet butonundan örneğin pizzalar seçip
ürün üstüne tıklayıp kayıt yapıyorum ama sorun oluşuyor.
Ben 15,50 kayıt yapıp excelde hücreye attığı zaman toplama dahil etmiyor.
İllaki nokta ile girmem gerekiyor. Virgülle girmek daha kolay ve hızlı olduğu için
bende o şekilde yapmak istiyorum.
ikinci konu butona hesap makinası oluşturmak istiyorum.
Bu konularda yardımlarınızı rica ediyorum.
Şİmdiden teşekkürler

 

[hamitcan]

Kod satırlarını bu şekilde düzenleyin.

ActiveCell.Offset(0, 2).Value = Replace(TextBox3.Value, ",", ".")

 

[TİKOS]

Hocam teşekkürler,
Hesap makinasını nasıl yapabiliriz.

 

[hamitcan]

Bir düğmeye bağlayarak çalıştırabilirsiniz.

Sub HesapMak()
    Dim RetVal
    RetVal = Shell("C:\Windows\System32\calc.exe", vbNormalFocus)
End Sub