TextBox Nesnesinde Kuruş Göstermek
14 Şubat 2021
14 Şubat 2021
1041
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 | |
|---|---|
| Çalışma Sayfasının Tümünü Seçme / Alternatif | Ctrl Shift Space |
| Hücreyi Para Birimi Olarak Biçimlendirme | Ctrl Shift $ |
| Üstü Çizgili Yazdırma | Ctrl 5 |
| Satır ve Sütun Başlıklarını Gizleme Gösterme | Alt P Ü |
| Hücreyi Araya Yerleştirme | Shift Sürükle |