Hoe een draaitabel filteren op basis van een specifieke celwaarde in Excel?
In Excel worden draaitabellen veel gebruikt om gegevens efficiënt samen te vatten, te analyseren en te verkennen. Standaard wordt het filteren binnen een draaitabel meestal uitgevoerd door de gewenste items te selecteren uit het filter-keuzemenu. Hoewel deze aanpak flexibiliteit biedt, zijn er bepaalde scenario's waarin een meer dynamische filtermethode nodig is — bijvoorbeeld, je wilt misschien dat de resultaten van de draaitabel automatisch veranderen op basis van de waarde die in een specifieke werkbladcel wordt ingevoerd. Dit is vooral handig bij het voorbereiden van dashboards, het automatiseren van workflows of het bouwen van interactieve rapporten voor eindgebruikers die mogelijk niet bekend zijn met handmatig filteren.
Excel biedt geen standaardfunctie die een celwaarde rechtstreeks koppelt aan een draaitabelfilter (zonder code te gebruiken). Er zijn echter verschillende praktische technieken om aan deze behoefte te voldoen, elk met hun eigen voordelen en overwegingen. Deze handleiding introduceert eerst een eenvoudige VBA-methode om een cel rechtstreeks te verbinden met een draaitabelfilter, zodat de draaitabel onmiddellijk wordt bijgewerkt wanneer de celwaarde verandert. Daarnaast behandelen we alternatieve methoden, zoals het gebruik van Excel-formules (bijv. GETPIVOTDATA, FILTER) om gefilterde resultaten weer te geven en het gebruik van Slicers als grafische filterbesturingselementen. Het begrijpen van deze opties helpt je de beste methode te kiezen voor je Excel-werkstroom en gebruikerservaring.
➤ Draaitabel filteren op basis van een specifieke celwaarde met VBA-code
➤ Excel-formule - Gefilterde draaitabelresultaten weergeven op basis van een celwaarde
➤ Andere ingebouwde Excel-methoden - Gebruik Slicers als interactieve draaitabelfilters
Draaitabel filteren op basis van een specifieke celwaarde met VBA-code
Als je echte dynamische interactie wilt — dat wil zeggen, wanneer je een waarde in een cel typt en het draaitabelfilter automatisch reageert op de wijziging — biedt VBA een directe oplossing. Dit is vooral handig in dashboards, sjablonen voor collega's of situaties waarin snelle filteraanpassingen nodig zijn door een enkele cel te wijzigen. Deze methode vereist echter basale kennis van de VBA-editor, en zoals bij alle macro's moet je werkmap worden opgeslagen in een macro-ondersteund formaat (.xlsm).
De volgende VBA-code maakt het mogelijk om een werkbladcel dynamisch te koppelen aan een draaitabelfilter. Volg deze stappen zorgvuldig en pas indien nodig de naam van het werkblad, de draaitabelnaam en de veldverwijzing aan in je werkmap:
Stap 1: Voer de waarde waarmee je je draaitabel wilt filteren in een werkbladcel in (bijvoorbeeld, typ of selecteer de filterwaarde in cel H6).
Stap 2: Open het werkblad dat je doel draaitabel bevat. Klik met de rechtermuisknop op het bladtabblad onderaan Excel en selecteer 'Bekijk code' in het contextmenu. Dit opent het VBA-editorvenster voor het werkblad.
Stap 3: Plak in het geopende Microsoft Visual Basic for Applications (VBA)-venster de volgende code in de code-module van het werkblad (niet een standaardmodule):
VBA-code: Draaitabel filteren op basis van celwaarde
Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180702
Dim xPTable As PivotTable
Dim xPFile As PivotField
Dim xStr As String
On Error Resume Next
If Intersect(Target, Range("H6:H7")) Is Nothing Then Exit Sub
Application.ScreenUpdating = False
Set xPTable = Worksheets("Sheet1").PivotTables("PivotTable2")
Set xPFile = xPTable.PivotFields("Category")
xStr = Target.Text
xPFile.ClearAllFilters
xPFile.CurrentPage = xStr
Application.ScreenUpdating = True
End Sub📝 Opmerkingen:
- "Sheet1" is het werkblad dat de draaitabel bevat. Pas indien nodig aan.
- "PivotTable2" is de naam van je draaitabel. Je kunt deze vinden in het tabblad Draaitabel Analyseren.
- "Categorie" is het veld dat je wilt filteren. Het moet exact overeenkomen met de veldnaam.
- H6 is de filtercel. Zorg ervoor dat de waarde overeenkomt met een item in de filterlijst.
- Filterwaarden moeten karakter voor karakter overeenkomen. Extra spaties of typfouten kunnen fouten of blanco resultaten veroorzaken.
Stap 4: Druk op Alt + Q om de VBA-editor te sluiten en terug te keren naar Excel.
Nu zou je draaitabel automatisch moeten filteren om alleen de gegevens weer te geven die overeenkomen met de waarde die in cel H6 is ingevoerd. Deze macro wordt elke keer uitgevoerd wanneer de waarde in H6 verandert, waardoor je gemakkelijk je gegevenssamenvatting dynamisch kunt aanpassen.
Je kunt de waarde in de filtercel op elk moment wijzigen — de draaitabel wordt onmiddellijk bijgewerkt wanneer de celinhoud wordt gewijzigd of vervangen.
Problemen oplossen:
- Zorg ervoor dat macros zijn ingeschakeld in je werkmap.
- Controleer dubbel of de namen van het werkblad, de draaitabel en de velden overeenkomen met je daadwerkelijke instelling.
- Zorg ervoor dat de filterwaarde in H6 exact overeenkomt met de waarden in de draaitabel.
- Deze VBA-aanpak werkt voor filters op één veld. Voor meerdere velden is extra scripten vereist.
Excel-formule – Weergave van gefilterde draaitabelresultaten op basis van een celwaarde
Voor gebruikers die liever geen macros inschakelen, biedt Excel formule-gebaseerde benaderingen om draaitabelresultaten weer te geven op basis van een specifieke celwaarde. Hoewel functies zoals GETPIVOTDATA en FILTER de filterinstellingen van de draaitabel niet daadwerkelijk wijzigen, kunnen ze samenvattingsresultaten dynamisch refereren en presenteren die reageren op gebruikersinvoer.
Deze oplossing is vooral nuttig bij het bouwen van aangepaste samenvattingstabellen, dashboards of rapporten die veranderende criteria weerspiegelen die door de gebruiker worden ingevoerd — zonder de oorspronkelijke draaitabelweergave te wijzigen.
Gebruik van GETPIVOTDATA:
Stel dat je draaitabel (genaamd "PivotTable2") verkopen per categorie samenvat, en de filterwaarde wordt ingevoerd in cel H6. Je kunt GETPIVOTDATA gebruiken om de totale verkopen voor de categorie die in H6 is opgegeven weer te geven:
1. Selecteer de cel waar je de samenvattingsresultaat wilt weergeven (bijvoorbeeld I6):
=GETPIVOTDATA("Sum of Sales", $A$4, "Category", $H$6)2. Druk op Enter. Wanneer je de waarde in H6 wijzigt, wordt het resultaat in I6 automatisch bijgewerkt om de bijbehorende samenvatting uit de draaitabel weer te geven.
Als je draaitabel verschillende veldnamen of -indelingen gebruikt, pas dan de formule dienovereenkomstig aan. Om automatisch een GETPIVOTDATA-formule te genereren, typ = in een cel en klik vervolgens op een waardecel binnen je draaitabel. Excel voegt de juiste formule in, die je vervolgens naar behoefte kunt bewerken.
Gebruik van FILTER met een hulptabel:
Als je gedetailleerde records wilt extraheren uit je originele dataset (in plaats van alleen draaitabelsamenvattingen), en je gebruikt Excel 365 of Excel 2019, laat de FILTER-functie dynamisch filteren op basis van een celwaarde toe:
Stel dat je brongegevens zich in het bereik A1:C100 bevinden en Categorie zich in kolom A bevindt.
1. Selecteer de startcel waar de gefilterde records moeten verschijnen (bijvoorbeeld J6):
=FILTER(A2:C100, A2:A100 = H6, "No data")2. Druk op Enter. De overeenkomende rijen worden weergegeven in aangrenzende cellen, waarbij alle records worden vermeld waarvan de categorie overeenkomt met de waarde in H6. Het bijwerken van H6 vernieuwt de resultaten onmiddellijk.
Om draaitabelgroeperingen te matchen of te filteren op meerdere criteria, overweeg dan om GETPIVOTDATA en FILTER te combineren, of breid de formule uit met extra logische voorwaarden.
📝 Tips & Waarschuwingen:
- Deze formules wijzigen het daadwerkelijke draaitabelfilter niet. Ze bieden slechts een aparte, dynamische weergave op basis van celwaarden.
- Om draaitabelfilters rechtstreeks te wijzigen is VBA vereist.
- Zorg ervoor dat de veldnamen die in
GETPIVOTDATAworden gebruikt exact overeenkomen met die in de draaitabel (hoofdlettergevoeligheid en spaties). - Als je
#VERW!-fouten ziet, controleer dan of je verwijzingen geldig zijn en de structuur van de draaitabel niet is veranderd.
Andere ingebouwde Excel-methoden – Gebruik Slicers als interactieve draaitabelfilters
Als VBA of formule-gebaseerde oplossingen niet volledig aansluiten op je werkstroom, bieden Excel's Slicers een andere interactieve methode om draaitabellen te filteren. Slicers zijn visuele filterbesturingselementen die gebruikers toestaan om gegevens te filteren met een eenvoudige klik-interface. Hoewel ze niet rechtstreeks aan celwaarden kunnen worden gekoppeld — wat betekent dat je een cel niet kunt veranderen om een Slicer te besturen — zijn ze intuïtief en uitermate effectief voor dashboards en rapporten die door niet-technische gebruikers worden gebruikt.
Hoe een Slicer toevoegen en gebruiken:
- Selecteer een cel binnen je draaitabel.
- Ga naar het tabblad Draaitabel Analyseren (of Analyseren in oudere versies) en klik op Slicer invoegen.
- In het dialoogvenster Slicers invoegen, vink het veld aan dat je wilt filteren (bijvoorbeeld Categorie), en klik vervolgens op OK.
- De Slicer zal verschijnen op je werkblad. Klik op een knop om de draaitabel te filteren op die waarde. Houd Ctrl ingedrukt om meerdere items te selecteren.
Slicers kunnen worden opgemaakt, vergroot/verkleind en gekoppeld aan meerdere draaitabellen voor gesynchroniseerd filteren over verschillende rapporten. Ze zijn vooral nuttig in dashboards of gedeelde werkboeken waar gebruikers mogelijk niet bekend zijn met dropdownfilters, maar toch gemakkelijk gegevens moeten kunnen filteren zonder VBA te gebruiken of formules te bewerken.
Beperkingen: Slicers ondersteunen geen native koppeling aan celwaarden. Als je werkstroom dynamisch filteren vereist dat wordt bestuurd door celinvoer, moeten Slicers worden beschouwd als een complementair hulpmiddel in plaats van een vervanging voor VBA of formule-gebaseerde methoden.
Daarnaast, als je gegevens zijn opgeslagen in een Excel-tabel (niet een draaitabel), kun je nog steeds Slicers gebruiken door de tabel te selecteren en naar het tabblad Tabelontwerp > Slicer invoegen te gaan.
Problemen oplossen: Als de Slicer niet lijkt te filteren op de draaitabel, controleer dan de Rapportverbindingen (onder het tabblad Slicer of Analyseren) om ervoor te zorgen dat deze correct is verbonden met de bedoelde draaitabel(len).
Elke van de bovenstaande methoden dient een ander doel: VBA maakt rechtstreeks cel-gekoppeld filteren mogelijk, formules bieden een dynamische weergave van resultaten, en Slicers bieden gebruikersvriendelijke grafische filtering. Kies de aanpak die het beste aansluit bij je behoefte aan automatisering, flexibiliteit en gebruiksgemak. Traditionele draaitabel-dropdownfilters blijven beschikbaar als een basis back-upoptie.
Gerelateerde artikelen:
- Hoe meerdere werkbladen combineren in een draaitabel in Excel?
- Hoe een draaitabel maken van een tekstbestand in Excel?
- Hoe een draaitabelfilter koppelen aan een bepaalde cel in Excel?
Beste productiviteitstools voor Office
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.
- 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