Skip to main content

Kutools voor Office — Eén Suite. Vijf Tools. Verwezenlijkt Meer.

Hoe een draaitabel automatisch vernieuwen in Excel?

Author Kelly Last modified

Normaal gesproken, wanneer we de brongegevens van een draaitabel bijwerken, wordt de draaitabel niet bijgewerkt totdat we handmatig Analyseren > Vernieuwen klikken. Dit kan nogal vervelend zijn als de draaitabel zich in een ander werkblad bevindt en je het misschien vergeet te vernieuwen. In dit artikel introduceren we een VBA om een draaitabel automatisch te vernieuwen in Excel.

Een draaitabel automatisch vernieuwen met VBA


Een draaitabel automatisch vernieuwen met VBA

Volg onderstaande stappen om de VBA toe te passen voor het automatisch vernieuwen van de opgegeven draaitabel in Excel.

1In de tabbladenbalk, klik met de rechtermuisknop op het tabblad dat de brongegevens bevat en selecteer Bekijk Code in het contextmenu. Zie screenshot:
A screenshot showing the right-click menu in Excel's Sheet tab where 'View Code' is selected

2. Plak de code in het venster Microsoft Visual Basic for Applications dat wordt geopend.

VBA: Automatisch de opgegeven draaitabel vernieuwen

Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets("sheet name").PivotTables("PivotTable name").PivotCache.Refresh
End Sub

Opmerkingen:
(1) In de code van Worksheets("naam van het werkblad").PivotTables("Draaitabel-naam").PivotCache.Refresh, vervang naam van het werkblad door de naam van het werkblad dat de opgegeven draaitabel bevat, en vervang Draaitabel-naam door de naam van de opgegeven draaitabel.
(2) Selecteer een willekeurige cel in de opgegeven draaitabel, dan krijg je de naam ervan te zien op het tabblad Analyseren (of het tabblad Opties ). Zie screenshot:
A screenshot showing the PivotTable name in the Analyze tab of Excel

3. Sla de code op.

Vanaf nu zal, wanneer je de gegevens in de brongegevens wijzigt, de opgegeven draaitabel automatisch worden vernieuwd.

Combineer eenvoudig meerdere werkbladen/werkboeken/CSV-bestanden in één werkblad/werkboek

Het kan vervelend zijn om tientallen werkbladen uit verschillende werkboeken samen te voegen in één werkblad. Maar met het hulpprogramma 'Combineer (werkbladen en werkboeken) ' van Kutools voor Excel kun je dit doen met slechts enkele klikken!

A promotional image for Kutools for Excel's Combine Worksheets and Workbooks tool

Kutools voor Excel - Boost Excel met meer dan 300 essentiële tools. Geniet van permanent gratis AI-functies! Nu verkrijgen

Gerelateerde artikelen:

Hoe per dag/maand/kwartaal/uur gemiddelden berekenen met een draaitabel in Excel?

Beste productiviteitstools voor Office

🤖 Kutools AI Assistent: Transformeer data-analyse door: Intelligente uitvoering |Code genereren |Aangepaste formules maken |Gegevens analyseren en grafieken genereren |Kutools functies aanroepen
Populaire functies: Dubbele waarden markeren | Verwijder lege rijen | Kolommen of cellen samenvoegen zonder gegevensverlies |   Afronden zonder formule...
Super ZOEKEN: Meervoudig-criteria opzoeken | Meervoudige waarde opzoeken | Meervoudig-blad opzoeken | Fuzzy Match....
Geavanceerde keuzelijst: Keuzelijst snel maken | Afhankelijke keuzelijst | Meervoudige selectie in keuzelijst....
Kolombeheer: Specifiek aantal kolommen toevoegen | Kolommen verplaatsen | Zichtbaarheidsstatus van verborgen kolommen wisselen | Bereik & kolommen vergelijken...
Uitgelichte functies: Rasterfocus | Ontwerpweergave | Verbeterde formulebalk | Werkboek- & Werkbladbeheer | AutoTekstbibliotheek | Datumkiezer | Gegevens samenvoegen | Cellen coderen/decoderen | E-mail verzenden via lijst | Superfilter | Speciaal filter (filter cellen met vetgedrukt/cursief/doorhalen...)...
Top15 gereedschapssets:12 teksttools (Tekst toevoegen, Specifieke tekens verwijderen, ...) | 50+ grafiek typen (Gantt-diagram, ...) | 40+ praktische formules (Leeftijd berekenen op basis van geboortedatum, ...) | 19 invoegtools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...) | 12 conversietools (Omzetten naar woorden, Valutaconversie, ...) | 7 Samenvoeg- & splitsgereedschappen (Geavanceerd samenvoegen van rijen, Cellen splitsen, ...) | ... en meer
Gebruik Kutools in je voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en meer dan40 andere talen!

Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...


Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger

  • Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
  • Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!

Alle Kutools-invoegtoepassingen. Eén installatieprogramma

Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.

Excel Word Outlook Tabs PowerPoint
  • Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
  • Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
  • Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
  • 30 dagen volledige proef — geen registratie, geen creditcard nodig
  • Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen