Hoe vernieuwt u een draaitabel wanneer de gegevens in Excel wijzigen?
Zoals u weet, wordt de bijbehorende draaitabel niet automatisch vernieuwd wanneer u de gegevens in de oorspronkelijke tabel wijzigt. Als u de draaitabel direct wilt laten bijwerken zodra de gegevens in uw Excel-tabel veranderen, deel ik graag een paar snelle methoden met u.
Vernieuw Draaitabel in een werkblad door op Vernieuwen te drukken
Vernieuw Draaitabel in een werkblad of werkmap met VBA
Vernieuw Draaitabel in een werkblad door op Vernieuwen te drukken
In Excel kun je met de functies **Vernieuwen** en **Alles vernieuwen** een draaitabel in één werkblad bijwerken.
Klik op een draaitabel waarvan u de gegevens wilt vernieuwen en klik vervolgens op Optie(in Excel 2013 klikt u op)ANALYSEREN) > Vernieuwen > Vernieuwen. Zie schermafbeelding:

Als u alle draaitabellen in één werkblad wilt vernieuwen, kunt u Alles vernieuwen selecteren.
Vernieuw Draaitabel in een werkblad of werkmap met VBA
Met VBA vernieuwt u niet alleen alle draaitabellen in één werkblad, maar zelfs alle draaitabellen in de volledige werkmap.
1. Druk op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik vervolgens op Invoegen > Module om een nieuw modulevenster in te voegen. Kopieer daarna de volgende VBA-code naar het venster.
VBA: Vernieuw een draaitabel in een werkblad.
Sub AllWorksheetPivots()
'Updateby20140724
Dim xTable As PivotTable
For Each xTable In Application.ActiveSheet.PivotTables
xTable.RefreshTable
Next
End Sub
3. Klik op de knop Uitvoeren in het venster of druk op de F5-toets om de VBA uit te voeren; daarna worden de draaitabel in het werkblad vernieuwd.
Tip: om alle draaitabellen in een volledige werkmap te vernieuwen, kunt u de volgende VBA-code gebruiken.
VBA: Vernieuw alle draaitabellen in een werkmap.
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
Gerelateerde artikelen:
- Vernieuw Draaitabel bij het openen van een bestand in Excel
- Werk Draaitabel Gegevensbereik bij in Excel
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins