Excel'de veri değiştiğinde PivotTable'i nasıl yenilerim?
Bildiğiniz gibi, orijinal tablodaki verileri değiştirdiğinizde ilgili PivotTable otomatik olarak kendi verilerini aynı anda yenilemez. Excel’de bir tablodaki veriler değiştiğinde PivotTable’ü yenilemeniz gerekiyorsa, işinizi kolaylaştıracak bazı hızlı yollar önerebilirim.
Çalışma sayfasında Yenile'ye basarak PivotTable'i yenileyin
Çalışma sayfasında veya çalışma kitabında VBA ile PivotTable'yı yenileyin
Çalışma sayfasında Yenile'ye basarak PivotTable'yi yenileyin
Excel'de, tek bir çalışma sayfasındaki PivotTable'i yenilemek için "Yenile" ve "Tümünü Yenile" seçenekleri mevcuttur.
Verilerini yenilemek istediğiniz PivotTable’a tıklayın, ardından Seçenekler(Excel 2013 sürümünde)ANALİZ) > Yenile > Yenile seçeneğine tıklayın. Ekran görüntüsüne bakın:

Tek bir çalışma sayfasındaki tüm PivotTable'ları yenilemek istiyorsanız, Tümünü Yenile seçeneğini kullanabilirsiniz.
Çalışma sayfasında veya çalışma kitabında VBA ile PivotTable'i yenileyin
VBA ile yalnızca tek bir çalışma sayfasındaki tüm PivotTable'ları değil, aynı zamanda tüm çalışma kitabındaki PivotTable'ları da yenileyebilirsiniz.
1. Microsoft Visual Basic for Applications penceresini açmak için klavyede Alt + F11 tuşlarına aynı anda basın.
2. Ardından Ekle > Modül seçeneğine tıklayarak yeni bir modül penceresi ekleyin. Daha sonra aşağıdaki VBA kodunu bu pencereye kopyalayın.
VBA: Çalışma Sayfasındaki PivotTabloyu Yenile.
Sub AllWorksheetPivots()
'Updateby20140724
Dim xTable As PivotTable
For Each xTable In Application.ActiveSheet.PivotTables
xTable.RefreshTable
Next
End Sub
3. Penceredeki Çalıştır düğmesine tıklayın ya da VBA'yı çalıştırmak için F5 tuşuna basın; böylece çalışma sayfasındaki PivotTable'lar yenilenir.
İpucu: Tüm çalışma kitabınızdaki PivotTable’ları yenilemek için aşağıdaki VBA kodunu kullanabilirsiniz.
VBA: Çalışma kitabınızdaki tüm PivotTable’ları tek seferde yenileyin!
Sub RefreshAllPivotTables()
'Updateby20140724
Dim xWs As Worksheet
Dim xTable As PivotTable
For Each xWs In Application.ActiveWorkbook.Worksheets
For Each xTable In xWs.PivotTables
xTable.RefreshTable
Next
Next
End Sub
İlgili Makaleler:
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar