Pivot Table Yenileme isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.

Uygulama Adımları​

  1. Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
  2. Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
  3. Araç çubuklarından Insert -> Module yazısına tıklayın.
  4. Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
  5. Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
  6. Alttaki kodu yapıştırın.

Hazır Kod​

VBA:
You must log in to view content
(12 satır)

Açıklama​

Bu makro, açık olan çalışma kitabındaki (ThisWorkbook) tüm çalışma sayfalarını (Worksheets) dolaşır ve her bir sayfadaki her bir PivotTable'ı bulur. Bulunan her PivotTable için RefreshTable metodu çağırılır, bu da PivotTable'ın veri kaynağından en son verileri çekerek yenilenmesini sağlar.

Nasıl Kullanılır​

  • Bu kodu kullanmak için, öncelikle Excel'de Alt + F11 tuşlarına basarak VBA editörünü açın.
  • "Insert" menüsünden "Module" seçeneğini tıklayarak yeni bir modül oluşturun.
  • Yukarıda verilen RefreshAllPivotTables subrutinini bu modüle yapıştırın.
  • VBA editörünü kapattıktan sonra, Excel'de "Developer" sekmesi altında yer alan "Macros" butonuna tıklayarak "RefreshAllPivotTables" makrosunu seçin ve "Run" butonuna tıklayın.
Bu makro, özellikle büyük ve karmaşık Excel raporlarında, veri kaynaklarındaki güncellemelerden sonra tüm PivotTable'ların hızlıca güncellenmesi gerektiğinde kullanışlıdır. PivotTable'larınızın veri kaynağı çok büyükse veya dış veri kaynaklarına bağlıysa, bu işlem biraz zaman alabilir, bu yüzden işlemin başlatılmasından önce bunu göz önünde bulundurun.

Faydalanılması temennisiyle
 
Üst