Userform Üzerinde ₺ Simgesi Hakkında.

22/09/2021, 00:23

Oğuz Türkyılmaz

Excel Userform üzerinde ₺ simgesini kullanarak bir işlem sonucunu textbox içinde  45.400 ₺ şeklinde gösterebilmek için kodda taklalar atıldı. Sistem ayarlarıyla oynamadan kod yazarak bu sonucu nasıl bir formatla elde edebilirim. Teşekkürler.
22/09/2021, 00:44

berduş

tam olarak amacınız ne? textboxta ₺ görünsün ama sayfaya başka aktarsın hesap yapılabilsin gibi bir şey mi?

mesela çıkışta formatla liraya çevrilen texboxları işlem yaparken 1 ile çarpınca sayısal olarak aldı
Me.TextBox3 = TextBox1.Value * 1 + TextBox2.Value * 1
22/09/2021, 00:51

Oğuz Türkyılmaz

@berduş hocam Hesaplar yapıldıktan sonra Sonuçlarını yani sayfadaki verileri Form üzerinde gösterme amaçlı.


22/09/2021, 00:58

berduş

resimden anladığım kadarıyla zaten gösteriyor
sorun ne?
atamayı aşağıdaki gibi yapmayı dener misiniz?
TextBox1 = Format(TextBox1, "#,##0.00 " & ChrW(8378))
22/09/2021, 15:40

Oğuz Türkyılmaz

(22/09/2021, 00:58)berduş yazdı: resimden anladığım kadarıyla zaten gösteriyor
sorun ne?
atamayı aşağıdaki gibi yapmayı dener misiniz?
TextBox1 = Format(TextBox1, "#,##0.00 " & ChrW(8378))

VBA da sizin yazdığınız şekilde formatlayarak yapmam gerekiyordu. Sistem ayarlarıyla oynayarak da bu şekilde gösterilebiliyor ama çok çetrefilli ve bir sürü ayarı kurcalıyorsunuz. Kod karşılığını öğrenmiş oldum teşekkür ederim.
22/09/2021, 16:29

berduş

rica ederim
iyi çalışmalar