TextBox Nesnesinde Kuruş Göstermek
14 Şubat 2021
14 Şubat 2021
1004
Textbox Nesnesinde Kuruş Göstermek isimli kodu kullanarak, sayfa ya da UserForm üzerindeki TextBox nesnesinde rakamların kuruşlu olarak gösterebilirsiniz.
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1 = Format(TextBox1, "###,###.00")
End SubGerekli Adımlar
Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Microsoft Excel Objects yazısının solundaki + simgesini tıklayın ve hangi sayfada deneme yapacaksanız, o sayfanın adının üstüne çift tıklayın.
- Üstteki kodu yapıştırın.
Kod Açıklaması
TextBox'ta kuruşlu rakam göstermenin en kolay yolu olarak bu kodu kullanabilirsiniz.
| YARARLI KISAYOLLAR | |
|---|---|
| TL Simgesi Eklemek | Ctrl Alt T |
| Üstteki Veriyi Kopyalama | Ctrl D |
| Hücreyi Para Birimi Olarak Biçimlendirme | Ctrl Shift $ |
| Tüm Tabloyu Seçme / Alternatif | Ctrl Shift Space |
| Altı Çizgili Yazdırma / Alternatif | Ctrl 4 |