Bu şablon, sayfadaki veri aralığından makro yardımıyla otomatik pivot tablo oluşturur. Veri aralığının satır ve sütun sayısı kod tarafından hesaplanır; tabloyu elle sihirbazla kurmaya gerek kalmaz.
Dosyanın içeriği
- exceldestek.com | exceldepo.com: A1:I15 aralığında kaynak veri bulunur. Başlık satırında Name ve Temperment sütunları yer alır; örnek kayıtlar Susy, Jasper ve Jake adlı hayvanlardır ve "good pet" ya da "bad pet" olarak işaretlenmiştir.
- Dosyada formül, grafik, tablo nesnesi ve hazır pivot tablo yoktur; pivot tablo makro çalıştırıldığında oluşturulur.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kod mMain modülündedir ve zararlı bir işlem (dosya silme, dış bağlantı) içermez.- CreatPivot: AutoPivot yordamını "Data", "Name" ve "Animal Type" parametreleriyle çağırır. Bu yordam çalıştırılan makrodur.
- AutoPivot: Veri sayfasını seçer, A1 hücresinin CurrentRegion alanından satır ve sütun sayısını bulur, bu aralığı kaynak alarak PivotTable1 adlı pivot tabloyu kurar. Birinci alan hem veri alanı olarak (xlCount ile sayım) hem de satır alanı olarak eklenir; ikinci alan sütun alanı olarak eklenir.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Verinizi başlık satırıyla birlikte A1 hücresinden başlayacak şekilde veri sayfasına yazın.
- Alt+F8 ile CreatPivot makrosunu çalıştırın.
- Makro farklı sütunlarla çalışacaksa CreatPivot içindeki üç parametreyi kendi sayfa ve sütun başlıklarınıza göre değiştirin. Mevcut verideki sütun başlıkları Name ve Temperment olduğundan, "Animal Type" parametresi bu başlıklarla eşleşecek şekilde güncellenmelidir.