Finansal Formu Hazırlama

Bu dosya, tarih, ünvan, mal toplamı ve KDV bilgilerinden oluşan fatura kayıtlarını bir kullanıcı formu üzerinden aylık olarak sorgulamanızı ve sonuçları rapor sayfalarına aktarmanızı sağlar. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: A1:I1319 aralığında fatura kayıtları yer alır. Başlıklar TARİH, ÜNVANI, MAL TOP. ve KDV şeklindedir. Ünvan sütununda ALBARAKA, TL.KASA, ARENA KAĞIT, HAS RENK AYRIMI gibi kayıtlar görülür.
• Rapor: "Müşteri Kodu" ve "Toplam Tutar" sütunlarından oluşan özet tablodur. Form üzerinden aktarılan liste buraya yazılır.
• FirmaFatura: Seçilen firmanın fatura satırlarını (tarih, ünvan, mal toplamı, KDV) listeler. Örnek kayıtlar ARENA KAĞIT firmasına aittir.

Dosyada hücre formülü bulunmaz. Hesaplamalar makro içindeki sorgularla yapılır.

Makrolar​

• Form: UserForm1 formunu açar.
• TarihDuzelt: Sayfa1 A sütunundaki metin biçimli tarihleri CDate ile gerçek tarihe çevirir.
• Makro1: Seçili hücrelere "#,##0.00 $" sayı biçimini uygular.
• UserForm1: Formun açılışında 12 ayın listesi hazırlanır, asgari tutar 8000 olarak gelir ve yıllık toplam ile belge adedi gösterilir. Listele düğmesi, seçilen aydaki kayıtları ünvana göre gruplar. Toplamı girilen tutarın üzerinde olanları büyükten küçüğe sıralar. Ayrıca aylık toplam ve belge adedini yazar. Birinci listede bir firmaya tıkladığınızda o firmanın seçili aydaki fatura satırları ikinci listede açılır. Diğer iki düğme, bu listeleri sırasıyla ikinci ve üçüncü sayfaya aktarır.

Kodda dosya silme ya da dışarıya bağlantı gibi zararlı bir işlem görünmez. Form, verileri okumak için dosyanın kendisine Microsoft.Jet.OLEDB.4.0 sağlayıcısıyla bağlanır.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Tarihler metin olarak görünüyorsa önce TarihDuzelt makrosunu çalıştırın.
3. Form makrosunu çalıştırarak formu açın.
4. Listeden ayı seçin, asgari tutarı girin ve listeleme düğmesine basın.
5. Ayrıntı için listedeki bir firmaya tıklayın.
6. Aktarma düğmeleriyle sonuçları rapor sayfalarına yazdırın.

Not: Form kodu ADODB kütüphanesine başvurur. Hata alırsanız VBA düzenleyicisinde Araçlar > Başvurular menüsünden Microsoft ActiveX Data Objects kütüphanesini işaretleyin.