VBA - Draaitabel vernieuwen bij gegevenswijzigingen

Deze zelfstudie laat zien hoe u een draaitabel kunt vernieuwen wanneer de gegevens veranderen met VBA.

Draaitabellen zijn een uitzonderlijk krachtig gegevenshulpmiddel van Excel. Met draaitabellen kunnen we grote hoeveelheden gegevens analyseren en interpreteren door velden en rijen te groeperen en samen te vatten.

Wanneer we een draaitabel maken, worden de gegevens opgeslagen in een zogenaamde draaitabelcache. De gegevens worden daarom opgeslagen in het cachegeheugen van de pc, wat de draaitabel versnelt.

Als we de gegevens bijwerken waarop de draaitabel is gebaseerd, wordt de draaitabel zelf niet automatisch bijgewerkt. We zouden op de knop Alles vernieuwen op het tabblad Gegevens op het lint moeten klikken om de draaitabel te vernieuwen.

De draaitabel in VBA vernieuwen

Wanneer de gegevens veranderen, kunnen we een macro schrijven in de Werkblad_Gebeurtenis wijzigen om de draaitabel bij te werken. Om toegang te krijgen tot het werkblad Change Event, moeten we naar de Visual Basic Editor in Excel (VBE) gaan.

druk op Alt+F11 om toegang te krijgen tot de VBE of in de Lintje, selecteer Ontwikkelaar > Visual Basic.

Opmerking: als u het ontwikkelaarslint niet ziet, moet u dit inschakelen.

In de Projectverkenner, selecteer het blad dat de draaitabel bevat.

In de Object vervolgkeuzelijst, selecteer werkblad. Hiermee wordt automatisch een evenement toegevoegd voor Selectie_Wijzigen.

In de Procedure vervolgkeuzelijst, selecteer Wijziging.

EEN Wijziging Evenement wordt toegevoegd aan de VBA-module in het blad.

OPMERKING: We kunnen de . verwijderen Worksheet_SelectionChange evenement, aangezien dit niet vereist is.

Binnen de Werkblad_Wijzigen evenement, typ de volgende code:

1 ActiveSheet.PivotTables("PivotTable1").RefreshTable

Schakel terug naar het Excel-blad en wijzig een waarde in de gegevenstabel. De gegevens in de draaitabel worden dan automatisch bijgewerkt.

U zal helpen de ontwikkeling van de site, het delen van de pagina met je vrienden

wave wave wave wave wave