TextBox Nesnesinde Kuruş Göstermek
14 Şubat 2021
14 Şubat 2021
838
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 | |
|---|---|
| İşlem Yapılmış En Üst Hücreye Gitme | Ctrl Home |
| Veri Aralığının En Üstüne Gitme | Ctrl ↑ |
| Bitişik Hücre Aralığı Seçme | Shift Tıklama |
| Eğik Yazdırma / Alternatif | Ctrl 3 |
| Hızlı Grafik Oluşturma | Alt F1 |