FORMDA GİRİLEN SAYININ PARA BİRİMİ OLARAK GÖZÜKMESİ

[eyup]

FORMDA GÝRÝLEN SAYININ PARA BÝRÝMÝ OLARAK GÃ?ZÜKMESÝ

USERFORM ÜZERİNDEKİ FİYAT KUTUSUNDA BİR DEÐER GİRİLDİÐİNDE SAYI BİÇİMİNDE GÃ?STERİYOR.BUNUN PARA BİRİMİ OLARAK HATTA OLURSA SONUNA YTL EKLEYEREK VERMESİNİ İSTİYORUM.
YARDIMCI OLURSANIZ SEVİNİRİM....
Ã?RNEK :
12000 YERİNE 12.000,00 YTL GİBİ

 

[Levent Menteşoğlu]

Aşağıdaki kodu para birimine çevirmek istediğiniz textbox a yazın. Burada dikkat etmeniz gereken eğer bu biçimi bir sayı olarak başka işlemlerde kullanacaksanız,excelinizde para birimi olarak YTL eklentisinin yüklü olması gerekir. Aksi takdirde bu yazım şekli bir metin olarak kabul edilir ve bir matematik işleminde kullanamazsınız.
[vb:1:64febdaa03]Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1 = Format(TextBox1, "#,##0.00 YTL")
End Sub
[/vb:1:64febdaa03]

 

[eyup]

TEÞEKKÜRLER