TextBox Nesnesinde Kuruş Göstermek

14 Şubat 2021 14 Şubat 2021 1003

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 Sub

Gerekli Adımlar

Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.

  1. Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
  2. 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.
  3. 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.
  4. Üstteki kodu yapıştırın.

Kod Açıklaması

TextBox'ta kuruşlu rakam göstermenin en kolay yolu olarak bu kodu kullanabilirsiniz.

50 Farklı Hazır Makro (VBA) Kodu
Kapanışta Sayfaların Otomatik Olarak Gizlenmesi
Aralıklı Olarak Satır Silme
Excel ile Demo Yapma Makrosu
Sütunlardaki Farkı Renklendirme
Son Dolu Satırı Başka Sayfaya Kopyala
Toplama İşlemi Yapan Kullanıcı Tanımlı Fonksiyon
2. Derece Denklemin Grafiğini Çizmek
Makrolar ile Klasör Kopyalama
X Sayı Atlayarak Satır Gizleme
Excel Üzerinden Klasör Alma Kodu
Açılışta İstediğiniz Sayfanın Aktif Edilmesi
Makro ile Açılan Liste Oluşturma
Kapanış Mesajı Ekleme
Select Case Kullanımı
Bilgisayar Bilgilerini Özetleme
Tarih Değeri Yazarken Otomatik Ayraç Kullanımı
UserForm Kapatma Kodu
Excel Satır Seçme Kodu
Sayfadaki Grafikleri Yeniden Boyutlandırma
Hücrede Değişiklik Olduğunda Makroyu Çalıştırma
Hücre İçerisine Kelime Ekleme
Adlandırılmış Aralıkları Vurgulama
Excel Makroları ile Dosya Sayısını Bulma
Birden Çok Çalışma Sayfası Ekleme
Roma Rakamlarını Normal Sayılara Dönüştürme
Tüm Çalışma Sayfalarını Gösterme
Seçili Sütunların Sayısını Bulma
Excel Kapanırken Otomatik İşlem Yaptırma
Tüm Satırları ve Sütunları Gösterme
Kare Kökünü Hesaplama
Makro ile Web Sitesini Açmak
Son Dolu Satırın Bir Altına Yazdırma
MsgBox ile Uyarı Çıkarma Kodu
UserForm Üzerine CommandButton Ekleme
Yardım Menüsünü Açma
Tarih ve Saatten Tarihi Kaldırma
Son Sütun Numarasını Bulma
Excel Makroları ile Dosya Silme
C Klasörüne Sanal Dizin Oluşturma
56 Koşula Kadar Biçimlendirme Yapma
Seçili Hücrenin Sütun Harfini Bulma
Excel Makroları ile İşlemci Bilgilerini Bulma
Çalışma Kitabındaki Tüm Çalışma Sayfalarını Koruma
Seçili Aralığı PDF Olarak Kaydetme
Kopyala ve Değer Olarak Yapıştır
Her Bir Sütundaki Maksimum Değeri Bulma
Bir Sayfadaki Veriyi Diğer Sayfalara Kopyalama
Açılışta UserForm Nesnesinin Otomatik Gösterilmesi
Tekrar Eden Verileri Farklı Sütunda Yazma
Klasörde Dosya Araması Yapma

Daha önce yorum yapılmamış!

Backlink Reklam Bu alanda 50 karakterlik açıklama ile web sitenize ait Backlink Reklam yayınlayabilirsiniz.
Yükleniyor...