ADO ile Bir Şarta Göre Veri Filtreleme

Bu dosya, muavin kayıtlarının bulunduğu bir veri sayfasından, girilen detay koduna göre ADO bağlantısı ve SQL sorgusuyla kayıt süzmeyi gösterir. Sonuçlar ayrı bir rapor sayfasına tek işlemle aktarılır. Hem uygulamalı bir raporlama aracı hem de ADO yöntemini öğrenmek için örnek bir çalışmadır.

Dosyanın içeriği​

• data: A1:J20508 aralığında yaklaşık 20 bin satırlık muavin verisi. ANAKOD, TARIH ve BORC gibi sütun başlıkları bulunur; tarihler 2014 yılına aittir.
• sorgu: Sorgu ekranıdır. E3 hücresinde DETAYKOD başlığı, E4 hücresinde süzülecek kod (örneğin 102.01.01.01) yer alır.
• sorgu-raporu: Sorgu sonucunun listelendiği sayfadır. Sonuç satırları A2 hücresinden itibaren yazılır.

Dosyada çalışma sayfası formülü bulunmaz; tüm işlem makro ile yürütülür.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem yoktur; bağlantı yalnızca açık çalışma kitabının kendisine kurulur.

• Baglanti_Yap (baglanti modülü): Microsoft.ACE.OLEDB.12.0 sağlayıcısıyla çalışma kitabına bir ADODB bağlantısı oluşturur ve açar. Excel 12.0, 14.0, 15.0 ve 16.0 sürümleri için aynı bağlantı dizesi kullanılır, başlık satırı okunur (hdr=yes).
• SorguHazirla (Module1): Önce sorgu sayfasındaki E4 hücresinin dolu olup olmadığını denetler; boşsa uyarı verir ve işlemi durdurur. Doluysa data sayfasından DETAYKOD değeri girilen kodla eşleşen kayıtları SELECT ve WHERE ile alır, DETAYKOD sütununa göre azalan sıralar. Kayıt bulunursa rapor sayfasındaki eski sonuçları temizler ve yeni sonucu A2 hücresinden itibaren yapıştırır; bulunamazsa "Uygun şartlarda veri bulunamadı" mesajı gösterir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. sorgu sayfasında E4 hücresine filtrelenecek detay kodunu yazın.
3. SorguHazirla makrosunu Alt+F8 penceresinden çalıştırın veya bir düğmeye atayın.
4. Sonuçları sorgu-raporu sayfasında inceleyin.
5. Kendi verinizi kullanmak için data sayfasındaki sütun başlıklarını koruyarak kayıtları değiştirin.

ADO bağlantısı için bilgisayarda Microsoft ACE OLEDB sağlayıcısının kurulu olması gerekir.