Excel'de veri değiştiğinde pivot tablosunu nasıl yenilersiniz?
Bildiğiniz gibi, eğer orijinal tabloda verileri değiştirirseniz, ilgili pivot tablo aynı anda içindeki verileri yenilemez. Excel'deki tabloda veri değişikliklerinde pivot tabloyu yenilemeniz gerekiyorsa, size bazı hızlı yöntemler gösterebilirim.
Pivot tablosunu bir çalışma sayfasında Yenile'ye basarak yenileyin
Bir çalışma sayfasında veya çalışma kitabında pivot tablosunu VBA ile yenileyin
Pivot tablosunu bir çalışma sayfasında Yenile'ye basarak yenileyin
Excel'de, tek bir çalışma sayfasındaki pivot tabloyu yenilemek için Yenile ve Tümünü Yenile fonksiyonları bulunmaktadır.
Verilerini yenilemek istediğiniz pivot tabloya tıklayın ve ardından Dönüştür'e tıklayın (Excel 2013'te, ANALİZ'i tıklayın) > Yenile > Yenile. Ekran görüntüsüne bakın:
Tek bir çalışma sayfasındaki tüm pivot tabloları yenilemek istiyorsanız, Tümünü Yenile seçeneğini kullanabilirsiniz.
Bir çalışma sayfasında veya çalışma kitabında pivot tablosunu VBA ile yenileyin
VBA ile sadece tek bir çalışma sayfasındaki tüm pivot tabloları değil, aynı zamanda tüm çalışma kitabındaki tüm pivot tablolarını da yenileyebilirsiniz.
1. Klavyede F11 + Alt tuşlarına birlikte basarak Microsoft Visual Basic for Applications penceresini açın.
2. Ardından Ekle > Modül'e tıklayarak yeni bir modül penceresi ekleyin. Ve ardından aşağıdaki VBA kodunu pencereye kopyalayın.
VBA: Bir çalışma sayfasında pivot tablolarını yenileme.
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 veya VBA'yı çalıştırmak için F5 tuşuna basın, ardından bir çalışma sayfasındaki pivot tabloları yenilenir.
İpucu: Tüm çalışma kitabındaki tüm pivot tabloları yenilemek için aşağıdaki VBA'yı kullanabilirsiniz.
VBA: Bir çalışma kitabındaki tüm pivot tablolarını yenileme.
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 Ofis Verimlilik Araçları
Kutools for Excel ile Excel becerilerinizi güçlendirin ve benzersiz bir verimlilik deneyimi yaşayın. Kutools for Excel, üretkenliği artırmak ve zamandan tasarruf etmek için300'den fazla Gelişmiş Özellik sunuyor. İhtiyacınız olan özelliği almak için buraya tıklayın...
Office Tab, Ofis uygulamalarına sekmeli arayüz kazandırır ve işinizi çok daha kolaylaştırır.
- Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma işlevini etkinleştirin.
- Yeni pencereler yerine aynı pencerede yeni sekmelerde birden fazla belge açıp oluşturun.
- Verimliliğinizi %50 artırır ve her gün yüzlerce mouse tıklaması azaltır!
Tüm Kutools eklentileri. Tek kurulum
Kutools for Office paketi, Excel, Word, Outlook & PowerPoint için eklentileri ve Office Tab Pro'yu bir araya getirir; Office uygulamalarında çalışan ekipler için ideal bir çözümdür.
- Hepsi bir arada paket — Excel, Word, Outlook & PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans — dakikalar içinde kurulun (MSI hazır)
- Birlikte daha verimli — Ofis uygulamalarında hızlı üretkenlik
- 30 günlük tam özellikli deneme — kayıt yok, kredi kartı yok
- En iyi değer — tek tek eklenti almak yerine tasarruf edin