Farklı Sayfalardan Veriler Alan Özet Tablo

Bu dosya, Sayfa1, Sayfa2 ve Sayfa3 adlı sayfalardaki verileri makro yardımıyla Pivot sayfasında tek bir özet tabloda birleştirir. Farklı sayfalardaki kayıtlar önce tek bir sorguyla bir araya getirilir, ardından toplamlar özet tabloda gösterilir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Pivot: Makro tarafından oluşturulan "Rky" adlı özet tablonun bulunduğu sayfa (A1:E13).
• Sayfa1: Kaynak veri, A2:C8 aralığı.
• Sayfa2: Kaynak veri, A2:C7 aralığı.
• Sayfa3: Kaynak veri, A2:C7 aralığı.

Kaynak sayfalarda her kayıt üç sütundan oluşur. Birinci sütun satır alanı, ikinci sütun sütun alanı, üçüncü sütun toplanan değer olarak kullanılır. Dosyada hücre formülü bulunmaz; tüm hesaplama özet tablo tarafından yapılır.

Makrolar​

• Workbook_Open: Dosya açıldığında çalışır ve Yeniden_Bağlan yordamını çağırır. Bu yordam, özet tablonun bağlantısını dosyanın bulunduğu klasöre ve adına göre günceller. Dosya başka bir klasöre taşınsa da tablo çalışmaya devam eder.
• Bağlan: Üç sayfayı geçici bir dosyaya kopyalar. Sayfaları UNION ALL içeren bir SQL sorgusuyla ODBC üzerinden okur, Pivot sayfasında A1 hücresine özet tabloyu oluşturur ve bağlantıyı asıl dosyaya çevirir. İşlem sonunda geçici dosya silinir. Silinen dosya yalnızca makronun kendi oluşturduğu "Evn" ile başlayan geçici dosyadır.
• Özet_Tabloyu_Hazırla: Ana makrodur. Bağlan yordamını çalıştırır, ilk alanı satıra, ikinci alanı sütuna yerleştirir, üçüncü alanı toplam (xlSum) olarak ekler. Tabloya PivotStyleMedium14 stilini uygular ve B:G sütunlarını #,##0.00 biçimine getirir. İkinci alan tarih ise yıl ve ay olarak gruplanır.
• Bağlantıyı_Sil ve Dosya_Formatını_Denetle: Eski bağlantıyı kaldırır ve dosya biçimine (.xlsx, .xlsm, .xls, .xlsb) göre geçici dosyanın uzantısını belirler.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Verileri Sayfa1, Sayfa2 ve Sayfa3 sayfalarına aynı sütun düzeniyle girin.
3. Pivot sayfasına geçin ve Alt+F8 ile Özet_Tabloyu_Hazırla makrosunu çalıştırın.
4. Veriler değiştiğinde özet tabloyu sağ tıklayıp yenileyin.

Sorgu ODBC "Excel Files" sürücüsünü kullanır; bu nedenle makro Windows ortamında çalışır.