TextBox lara girilen rakamların para bazında gösterilmesi

[oerbas]

TextBoxlara giriş maskesi koyarak girilen rakamların para bazında ondalık basamaklara ayrılmış olarak 111.111.111. biçiminde yazdırabilirmiyiz

 

[xxrt]

TextBox1 = Format(TextBox1, "###,0") parasal olarak bunu kullanın

 

[Fenomen]

O şekilde yapınca textboxta 100.000 görünüyo ama excele 100 diye atıyo bu nasıl engellenir?

 

[xxrt]

Þu kodlarla denermisin?

Private Sub CommandButton1_Click()
Range("a1").Select
ActiveCell.Formula = TextBox1
End Sub