Hoe subtotalen in een draaitabel verbergen?

In een draaitabel, wanneer je meer dan één veld toevoegt aan de rij- of kolomlabels, worden subtotalen weergegeven. Heb je ooit geprobeerd de subtotalen uit de draaitabel te verwijderen?

Subtotalen in één draaitabel verbergen of verwijderen

Subtotalen in alle draaitabellen van het huidige werkblad verbergen of verwijderen

Subtotalen in één draaitabel verbergen of verwijderen

Om de subtotalen in één draaitabel te verwijderen, is er een eenvoudige manier voor jou, doe als volgt:

1. Klik op een willekeurige cel in je draaitabel en klik vervolgens op Ontwerp > Subtotalen > Geen subtotalen weergeven, zie screenshot:

2. En de subtotalen binnen de aangegeven draaitabel zijn meteen verborgen, zie screenshots:

Subtotalen in alle draaitabellen van het huidige werkblad verbergen of verwijderen

Als er meerdere draaitabellen in je huidige werkblad staan, en het verbergen van de subtotalen één voor één zou tijdrovend zijn, kan de volgende VBA-code je helpen om subtotalen uit alle draaitabellen te verwijderen.

1. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.

2. Klik op Invoegen > Module, en plak de volgende code in het modulevenster.

VBA-code: Subtotalen verwijderen in alle draaitabellen van het huidige werkblad

Sub RemoveSubtotals()
'Update 20140905
    Dim xPt As PivotTable
    Dim xPf As PivotField
    On Error Resume Next
    For Each xPt In Application.ActiveSheet.PivotTables
      For Each xPf In xPt.PivotFields
        xPf.Subtotals(1) = True
        xPf.Subtotals(1) = False
      Next
    Next
End Sub

3. Druk vervolgens op de F5-toets om deze code uit te voeren, en de subtotalen in alle draaitabellen van het actieve werkblad zijn meteen verwijderd.

Tip: Als je de subtotalen opnieuw wilt weergeven, kun je op de draaitabel klikken en op Ontwerp > Subtotalen onderaan groep weergeven / Subtotalen bovenaan groep weergeven klikken.

Gerelateerde artikelen:

Hoe meerdere eindtotalen in een draaitabel weergeven?

Hoe sorteren met een aangepaste lijstvolgorde in een draaitabel?