ADO ile ListBox Değerini Yüzde Biçiminde Gösterme

ADO ile ListBox Değerini Yüzde Biçiminde Gösterme

ADO ile ListBox Değerini Yüzde Biçiminde Gösterme
Bu dosya, bir UserForm üzerindeki ListBox'ta çalışma sayfasındaki verileri ADO bağlantısıyla listeler. Oran sütunu sorgu içinde biçimlendirildiği için değerler ListBox'a doğrudan yüzde olarak gelir. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

  • veriler sayfası: A1:E3 aralığında başlık satırı ve veri satırları bulunur. Sütunlar ID, ADI, SOYADI, ORAN ve MAAŞ alanlarına karşılık gelir.
  • UserForm1: Üzerinde 5 sütunlu bir ListBox (ListBox1) vardır.
  • Module1: ADO bağlantısını kuran Baglanti_Yap yordamını içerir.

Kullanılan formüller​

Sayfada hücre formülü yoktur. Yüzde biçimlendirmesi, UserForm içindeki SQL sorgusunda FORMAT fonksiyonuyla yapılır. Sorgudaki ilgili ifade şöyledir:
Excel formülü
FORMAT(ORAN, '#,##0.0%')
Bu ifade ORAN değerini binlik ayraçlı ve bir ondalık basamaklı yüzde olarak döndürür.

Makrolar​

  • Baglanti_Yap (Module1): Genel bir ADODB bağlantı nesnesi oluşturur. Bağlantı, Microsoft.ACE.OLEDB.12.0 sağlayıcısı ve Excel 12.0 özellikleriyle, başlık satırı kabul edilerek (hdr=yes) çalışma kitabının kendi dosyasına kurulur. Excel sürümü 12.0, 14.0, 15.0 ve 16.0 için aynı bağlantı dizesi kullanılır. Bağlantı zaten açıksa kapatılır ve yordamdan çıkılır.
  • UserForm_Initialize (UserForm1): Form açılırken Baglanti_Yap çağrılır. Ardından veriler sayfasından ID, ADI, SOYADI, biçimlendirilmiş ORAN ve MAAŞ alanları sorgulanır. Kayıt varsa sonuç ListBox1'e 5 sütun olarak aktarılır.
  • UserForm_Click: Boş bir olay yordamıdır, işlem yapmaz.
Makrolar dosya silme veya dış bağlantı gibi işlemler içermez; bağlantı yalnızca dosyanın kendisine kurulur.

Nasıl kullanılır​

  1. Dosyayı açın ve makroları etkinleştirin.
  2. VBA düzenleyicisinde (Alt+F11) UserForm1 formunu çalıştırın (F5).
  3. ListBox'ta veriler sayfasındaki kayıtlar, oran sütunu yüzde biçiminde olacak şekilde listelenir.
  4. Kendi verinizi kullanmak için veriler sayfasındaki satırları değiştirin; sütun başlıkları sorgudaki alan adlarıyla aynı kalmalıdır.
  5. Sütun genişlikleri için UserForm1 kodunda yorum satırı olarak duran ColumnWidths satırı kullanılabilir.
Bağlantı için bilgisayarda ACE OLEDB sağlayıcısının yüklü olması gerekir.

Galeri

  • ADO ile ListBox Değerini Yüzde Biçiminde Gösterme - 1
    ADO ile ListBox Değerini Yüzde Biçiminde Gösterme - 1

ExcelDepo tarafından daha fazla dosya

Detaylar
Yazar
ExcelDepo
İndirme
12
Gösterim
2,348
İlk sürüm
Güncel
SHA-256
fb7710d25b924a01bca23c00f1967266b96760b6d6138b4f40eddd38da8d85f9

Puanlar

5.00 Oylama 1 İnceleme
Geri
Üst