TextBox Nesnesinde Kuruş Göstermek
14 Şubat 2021
14 Şubat 2021
993
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 | |
|---|---|
| Veri Aralığının En Sağına Gitme | Ctrl → |
| Açılır Listeden Seçim Yapma | Alt ↓ |
| Hücreyi Kopyalama/Çoğaltma | Ctrl Sürükle |
| Binlik Ondalık Ayırıcı Ekleme | Ctrl Shift 1 |
| Bir Ekran Yukarı Git | PgUp |