Wie lösche ich eine oder alle Pivot-Tabellen in Excel?

Die Pivot-Tabelle ist eine sehr nützliche Funktion zum Anzeigen oder Berechnen von Daten in Excel. Daher können wir Pivot-Tabellen normalerweise in ein Arbeitsblatt oder mehrere Arbeitsblätter einfügen. Aber wissen Sie, wie Sie eine oder alle Pivot-Tabellen in einem Arbeitsblatt oder der gesamten Arbeitsmappe löschen?

Löschen Sie eine Pivot-Tabelle in einem Arbeitsblatt

Löschen Sie mit VBA alle Pivot-Tabellen in der gesamten Arbeitsmappe

---

Löschen Sie eine Pivot-Tabelle in einem Arbeitsblatt

In Excel können Sie eine Pivot-Tabelle wie folgt löschen:

1. Klicken Sie auf den Pivot-Tabellenbericht. Siehe Screenshot:

2. Dann klick Option > Auswählen > Gesamte PivotTable auswählen, dann Pivot-Tabelle. Siehe Screenshot:

Tipp: Wenn Sie Excel 2013 verwenden, wählen Sie bitte die gesamte Pivot-Tabelle aus, indem Sie auf klicken Analysieren > Auswählen > Gesamte PivotTable.

3. Und drücken Sie Löschen Taste auf der Tastatur, wird die Pivot-Tabelle entfernt.

---

Löschen Sie mit VBA alle Pivot-Tabellen in der gesamten Arbeitsmappe

Wenn eine Arbeitsmappe mehrere Pivot-Tabellen enthält, ist das Löschen nacheinander zu zeitaufwändig. Jetzt können Sie sie mit einem VBA sofort entfernen.

1. Drücken Sie Alt + F11 um das anzuzeigen Microsoft Visual Basic für Applikationen Fenster.

2. Klicken Sie im Fenster auf Insert > Modul Um ein neues Modulfenster anzuzeigen, kopieren Sie den folgenden VBA-Code in das Modulfenster.

VBA: Entfernen Sie alle Pivot-Tabellen in der gesamten Arbeitsmappe.

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 Klicken Führen Sie Klicken Sie auf die Schaltfläche, um alle Pivot-Tabellen in der gesamten Arbeitsmappe zu entfernen.

---

Relative Artikel:

• Entfernen Sie alle Kommentare in Excel