Dava Takip Dosyası, KAYIT sayfasında tutulan dava kayıtlarını bir UserForm üzerinden mahkemeye ve infaz durumuna göre süzmenizi sağlar. Sorgu, Excel'in ADO bağlantısı ile çalışır ve sonuçlar DURUŞMALAR sayfasına aktarılır. Avukatlar ve dava dosyası takip eden kullanıcılar için basit bir örnek olarak hazırlanmıştır.
Dosyanın içeriği
- KAYIT: Veri sayfasıdır. İkinci satırda DAVA TAKİP NO, ESAS NO, KARAR NO, BABA ADI, DOĞUM TARİHİ, İLÇESİ, SUÇUN NEV'İ, BÖLME NO, MEVKİİ, EMVALİN MİKTARI gibi sütun başlıkları bulunur. Örnek kayıt olarak 1086 takip numaralı, 1997/127 esas numaralı ve TEKKEKÖY ilçeli bir dava girilmiştir.
- DURUŞMALAR: Sorgu sonuçlarının yazıldığı sayfadır. Mahkeme, sanık adı, suçun nev'i ve tutar bilgileri içeren örnek satırlar (SULH CEZA, KESME, NAKİL, İŞGAL, SARF gibi) bulunur.
Kullanılan formüller
- KAYIT sayfasında toplam 34 adet TOPLA (SUM) formülü vardır. Örneğin BW2 hücresindeki
=SUM(AT2+AW2+AZ2+BC2+BF2+BI2+BO2...)benzeri formül, aynı satırdaki belirli sütunlarda yer alan tutarları toplar. - Dosyada #REF! hatası veren ve başka dosyalara bağlı eski tanımlı adlar da bulunur. Bunlar çalışmayı etkilemez, isterseniz Ad Yöneticisi'nden temizleyebilirsiniz.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makrolarda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem görünmemektedir; bağlantı yalnızca dosyanın kendisine kurulur.- EXC (Module1): UserForm1 formunu açar.
- UserForm_Initialize: Form açılırken mahkeme listesini (TÜMÜ, SULH CEZA, SULH HUKUK, KADASTRO, ASLİYE HUKUK, ASLİYE CEZA) ve infaz durumu listesini (TÜMÜ, DERDEST, KESİNLEŞMİŞTİR, DEVAM EDEN, TEMYİZ) doldurur.
- CommandButton1_Click: İki seçim de yapılmışsa DURUŞMALAR sayfasındaki A2:N5000 alanını temizler, ADO ile KAYIT sayfasına bağlanır (Office 2007 ve sonrası için ACE.OLEDB.12.0, eski sürümler için Jet 4.0) ve seçimlere göre MAHKEMESİ ve İNFAZ alanlarında süzme yapan bir sorgu çalıştırır. Sonucu DURUŞMALAR!A2 hücresinden itibaren yapıştırır ve dolu satırlara kenarlık ekler.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Dava bilgilerinizi KAYIT sayfasına girin.
- Alt+F8 ile
EXCmakrosunu çalıştırarak formu açın. - Mahkeme ve infaz durumunu seçin, düğmeye tıklayın.
- Sonuçları DURUŞMALAR sayfasında inceleyin.