Hoe verwijder je één of alle draaitabellen in Excel?

Een draaitabel is een zeer nuttige functie om gegevens in Excel te bekijken of te berekenen, dus we voegen vaak draaitabellen in een werkblad of meerdere werkbladen in. Maar weet je hoe je één of alle draaitabellen in een werkblad of het hele werkboek kunt verwijderen?

Verwijder één draaitabel in een werkblad

Verwijder alle draaitabellen in het hele werkboek met VBA

---

Verwijder één draaitabel in een werkblad

In Excel kun je één draaitabel als volgt verwijderen:

1. Klik op het draaitabelrapport. Zie screenshot:

2. Klik vervolgens op Opties > Selecteren >Gehele Draaitabel om de draaitabel te selecteren. Zie screenshot:

Tip: Als je Excel 2013 gebruikt, selecteer dan de hele draaitabel door te klikken op Analyseren > Selecteren > Gehele Draaitabel.

3. Druk op de Verwijderen-knop op het toetsenbord en de draaitabel wordt verwijderd.

---

Verwijder alle draaitabellen in het hele werkboek met VBA

Als je meerdere draaitabellen in een werkboek hebt, is het te tijdrovend om ze één voor één te verwijderen. Nu kun je een VBA gebruiken om ze in één keer te verwijderen.

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster weer te geven.

2. Klik in het venster op Invoegen > Module om een nieuw modulevenster te openen, kopieer vervolgens de volgende VBA-code naar het modulevenster.

VBA: Verwijder alle draaitabellen in het hele werkboek.

Sub DeleteAllPivotTablesInWorkbook()
'Updateby20140618
Dim xWs As Worksheet
Dim xPT As PivotTable
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xPT In xWs.PivotTables
        xWs.Range(xPT.TableRange2.Address).Delete Shift:=xlUp
    Next
Next
End Sub

3. Klik Uitvoeren knop, vervolgens worden alle draaitabellen in het hele werkboek verwijderd.

---

Gerelateerde artikelen:

• Verwijder alle opmerkingen in Excel