Skip to main content

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

Hoe een draaitabel-filter koppelen aan een specifieke cel in Excel?

Author Siluvia Last modified

In Excel wilt u vaak interactieve rapporten maken waarbij het filter van uw draaitabel de waarde in een specifieke cel weerspiegelt. Dit stelt gebruikers in staat om een filterwaarde te selecteren of invoeren op één plek, waarna de draaitabel dynamisch wordt bijgewerkt op basis van die invoer. Deze methode is vooral handig bij het ontwerpen van dashboards of aangepaste filterinterfaces voor gegevensverkenning.

Dit artikel biedt verschillende praktische oplossingen, inclusief een VBA-gebaseerde benadering en andere ingebouwde Excel-methoden, om u te helpen een draaitabelfilter aan een celwaarde te koppelen of vergelijkbare dynamische rapportage-effecten te bereiken.


Koppel een draaitabelfilter aan een specifieke cel met VBA-code

Als u de meest directe koppeling nodig hebt tussen een cel en een draaitabelfilter – zodat het wijzigen van een celwaarde automatisch het draaitabelfilter bijwerkt – biedt VBA een praktische manier om dit te bereiken. Deze aanpak is geschikt voor interactieve dashboards of rapporten waar gebruikers snel gegevenssegmenten willen beheren vanuit één cel.

Opdat deze techniek werkt, moet uw draaitabel een filterveld bevatten. De naam van het filterveld is cruciaal voor het correct configureren van de VBA-code.

Beschouw het volgende voorbeeld: De draaitabel heeft een filterveld genaamd Categorie, met twee filterwaarden: “Expenses” en “Sales”. Door een cel te koppelen aan het draaitabelfilter kunt u de weergegeven gegevens beheren door in uw gekozen cel “Expenses” of “Sales” te typen.

link Pivot Table filter to a certain cell

Om dit te implementeren:

  • Selecteer de cel die u wilt gebruiken als filtercontroller (bijvoorbeeld cel H6), en voer van tevoren een van uw filterwaarden in. Zorg ervoor dat de waarde exact overeenkomt met die beschikbaar in het draaitabelfilterveld.
  • Ga naar het werkblad met uw draaitabel. Klik met de rechtermuisknop op het bladtabblad en kies Broncode weergeven in het menu. Hiermee opent u het Visual Basic for Applications-venster.

Right click the sheet tab and select View Code

Plak in het Microsoft Visual Basic for Applications-venster de volgende VBA-code in het codepaneel.

VBA-code: Koppel draaitabelfilter aan een specifieke cel

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")) 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:

1) Sheet1 is de naam van het blad. Pas deze indien nodig aan.
2) PivotTable2 is de naam van de draaitabel. Pas deze aan volgens uw daadwerkelijke tabel.
3) “Categorie” is het veld dat wordt gefilterd. Zorg ervoor dat de spelling overeenkomt met uw tabelveld.
4) H6 is de referentiecel die is gekoppeld aan het filter. U kunt het celadres indien nodig wijzigen. Zorg ervoor dat de cel altijd een geldige filterwaarde bevat die aanwezig is in uw dataset.

Nadat u de code hebt geplakt, drukt u op Alt + Q om het VBA-editorvenster te sluiten en terug te keren naar Excel.

Nu wordt de filterstatus van uw draaitabel beheerd door de inhoud van cel H6. Door eenvoudigweg de waarde in cel H6 te wijzigen (in "Sales" of "Expenses") wordt de weergave van de draaitabel onmiddellijk bijgewerkt. Als u problemen ondervindt, controleer dan of de waarde in de gerefereerde cel exact overeenkomt met een filterwaarde in de draaitabel en dat namen in uw code correct zijn toegewezen.

Refresh the cell, then corresponding data are filtered out based on the existing value

Telkens wanneer u de inhoud van de cel wijzigt, vernieuwt de draaitabel diens gefilterde gegevens dienovereenkomstig.

When changing the cell value, the filtered data in the Pivot Table will be changed automatically.

Tips en probleemoplossing: Als de filterveldwaarde in de cel niet exact overeenkomt met de beschikbare items (inclusief hoofdletters en spaties), kan de code het filter mogelijk niet zoals verwacht toepassen. Controleer altijd of uw velden en tabelnamen correct zijn gespeld in de VBA-code. Als u deze instelling wilt gebruiken voor meerdere draaitabellen, kunt u de code verder aanpassen of uitbreiden met lussen.

a screenshot of kutools for excel ai

Ontdek de Magie van Excel met Kutools AI

  • Slimme Uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak diagrammen – allemaal aangestuurd door eenvoudige commando's.
  • Aangepaste Formules: Genereer op maat gemaakte formules om uw workflows te versnellen.
  • VBA-codering: Schrijf en implementeer VBA-code moeiteloos.
  • Formule-uitleg: Begrijp complexe formules gemakkelijk.
  • Tekstvertaling: Overbrug taalbarrières binnen uw spreadsheets.
Verhoog uw Excel-mogelijkheden met AI-aangedreven tools. Download Nu en ervaar een ongekende efficiëntie!

Excel-formule - Gebruik formules (bijv. GETPIVOTDATA) in combinatie met slicer of Rapport Filter-verwijzing

Hoewel Excel geen puur native formulemethode biedt om een draaitabelfilter rechtstreeks aan een cel te koppelen, kunt u dynamische rapportage en relevante waarden weergeven met behulp van formules zoals GETPIVOTDATA in combinatie met slicers of rapportfilters. Deze oplossing is nuttig wanneer u dashboards wilt bouwen waar samenvattingswaarden direct worden bijgewerkt op basis van een filterselectie of invoer in een andere cel, waardoor gegevensanalyse interactiever wordt.

Toepasselijke scenario's omvatten dynamische rapportpanelen, dashboards of vergelijkende samenvattingen waar u wilt dat het weergegeven resultaat volgt op slicerselecties of gegevens weerspiegelt gerelateerd aan de inhoud van een cel. Het belangrijkste voordeel is dat deze methode goed werkt voor het weergeven van bijgewerkte samenvattingsgegevens. Het daadwerkelijke filterstatus van de draaitabel kan echter niet programmatisch worden ingesteld door een celformule alleen.

Voorbeeld: Weergave van draaitabelsamenvatting op basis van een celwaarde

Stel dat u een draaitabel hebt die verkopen samenvat per Categorie (bijv. “Sales”, “Expenses”). U kunt GETPIVOTDATA gebruiken om de relevante waarde te extraheren voor een categorie die is opgegeven in een cel.

1. Stel dat cel H6 de categorie bevat die u wilt weergeven (bijv., “Sales”). Plaats de volgende formule in uw samenvattingscel (bijv., I6):

=GETPIVOTDATA("Sum of Amount",$B$4,"Category",H6)

2. Nadat u de formule in I6 hebt ingevoerd, drukt u op Enter. Nu, wanneer u H6 wijzigt naar een geldige categorie (zoals "Expenses" of "Sales"), wordt I6 onmiddellijk bijgewerkt om het totaal voor die categorie weer te geven, conform de huidige draaitabel.

Opmerkingen:
  • Het eerste argument “Som van Bedrag” moet worden vervangen door de daadwerkelijke naam van het Waarden-veld in uw draaitabel (bijvoorbeeld, "Totaal Verkoop" of welke label uw waarden ook gebruiken). Evenzo moet $B$4 worden vervangen door een verwijzing naar een specifieke cel binnen uw draaitabel – Excel herkent deze verwijzing automatisch en associeert deze met de juiste draaitabel om de GETPIVOTDATA-functie correct te laten werken.
  • Om uw precieze GETPIVOTDATA-syntaxis te krijgen, klikt u in een cel van uw draaitabel en probeert u een waarde te verwijzen – Excel genereert automatisch de juiste syntaxis. Zorg ervoor dat H6 overeenkomt met een van de beschikbare categorieën in de tabel voor nauwkeurige resultaten.

Tip: Hoewel deze methode het filter binnen de draaitabel zelf niet wijzigt, geeft het effectief uitkomstgegevens weer alsof ze gefilterd zijn door de cel, wat een dynamische weergave biedt gekoppeld aan uw doelcelinvoer. U kunt deze methode ook gebruiken om grafieken, samenvattingstabellen of dashboards te ondersteunen.

Probleemoplossing: Als de formule een #VERW! of #WAARDE! fout retourneert, controleer dan of uw celverwijzingen correct zijn, de ingevoerde categorie bestaat in uw draaitabel en de veld/somnaam exact overeenkomt.


Andere ingebouwde Excel-methoden - Verbind draaitabelslicers en dashboards voor interactief filteren

Excel’s Slicer- en Rapportfiltergereedschappen bieden gebruiksvriendelijke, ingebouwde opties voor interactief filteren zonder VBA-code te schrijven. U kunt deze methoden gebruiken om een dashboard-achtig effect te bereiken, waarbij meerdere draaitabellen of weergaven zijn verbonden aan een of meer slicers.

Een veelvoorkomende aanpak is het invoegen van een slicer die is gekoppeld aan uw draaitabelveld (bijvoorbeeld, “Categorie”). Gebruikers klikken gewoon op de gewenste items in de slicer en de draaitabel(len) worden dienovereenkomstig bijgewerkt. Als u meerdere draaitabellen hebt gebaseerd op dezelfde gegevensbron, kunt u een enkele slicer koppelen aan alle tabellen voor gesynchroniseerd filteren, waardoor uw rapportage-interface intuïtiever en consistent wordt.

Om een slicer te maken en te koppelen:

  • Klik in uw draaitabel en ga naar Draaitabel analyseren (of Opties-tabblad, afhankelijk van de Excel-versie) > Slicer invoegen.
  • Vink het gewenste veld aan (bijvoorbeeld Categorie) en klik op OK. De slicer verschijnt op het blad en stelt gebruikers in staat om visueel te filteren.
  • Om één slicer aan meerdere draaitabellen te koppelen, klikt u met de rechtermuisknop op de slicer en kiest u Rapportverbindingen (of Draaitabelverbindingen), en vink alle draaitabellen aan die u wilt synchroniseren.
    Dit is vooral krachtig voor dashboardscenario's waarbij verschillende visualisaties samen reageren op gebruikersfilters.

Voordelen: Heel gemakkelijk te gebruiken voor de meeste interactieve filterbehoeften en vereist geen macro’s of aangepaste code. Geweldig voor dashboards of gedeelde rapporten waar eenvoud en betrouwbaarheid cruciaal zijn. De beperking is dat absolute cel-naar-filterautomatisering (cel-naar-filterbinding) niet standaard wordt ondersteund – directe waarde-naar-filtertoewijzing vereist VBA of externe tools.

Probleemoplossing: Als een slicer niet is verbonden met meerdere draaitabellen, controleer dan of alle tabellen zijn gebouwd uit dezelfde cache/gegevensbron. De optie Rapportverbindingen verschijnt alleen als de tabellen compatibel zijn.

Samenvattende suggestie: Bij het kiezen van de optimale methode om draaitabelfilters te koppelen aan celwaarden of interactieve dashboards te bouwen, houdt u rekening met uw vereiste mate van automatisering, Excel-versiebeperkingen en of VBA/macros zijn toegestaan in uw omgeving. Voor basisbehoeften bieden slicers en formules (GETPIVOTDATA) snelle, robuuste resultaten. Voor geavanceerde automatisering biedt de VBA-oplossing meer controle. Controleer altijd dat veldnamen en filteritems consistent worden gebruikt voor nauwkeurige resultaten. Als er fouten optreden, controleer dan celinvoerwaarden en zorg ervoor dat alle namen exact overeenkomen tussen code, formules en de dataset.


Gerelateerde artikelen:

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