KutoolsforOffice — Eine Lösung, fünf leistungsstarke Tools.Mehr erreichen mit weniger Aufwand.März-Aktion: 20 % Rabatt

Wie blendet man Zwischensummen in einer PivotTable aus?

AutorXiaoyang Änderungsdatum

In einem PivotTable werden Zwischensummen automatisch angezeigt, sobald Sie mehr als ein Feld zu den Zeilen- oder Spaltenbeschriftungen hinzufügen. Haben Sie schon einmal versucht, diese Zwischensummen aus dem PivotTable zu entfernen?

Zwischensummen in einer PivotTable ausblenden oder entfernen

Zwischensummen in allen PivotTable von Aktuelles Arbeitsblatt ausblenden oder entfernen


Zwischensummen in einer PivotTable ausblenden oder entfernen

Um die Zwischensummen in einer PivotTable zu entfernen, gibt es eine einfache Methode – gehen Sie wie folgt vor:

1.Klicken Sie auf eine beliebige Zelle in Ihrer PivotTable, und klicken Sie anschließend auf Entwurf>Zwischensummen>Keine Zwischensummen anzeigen, siehe Screenshot:

Ein Screenshot, der zeigt, wie Zwischensummen in einer PivotTable ausgeblendet werden

2.Die Zwischensummen innerhalb der angegebenen PivotTable wurden sofort ausgeblendet, siehe Screenshots:

Ein Screenshot der Originaldaten der PivotTableEin Screenshot eines PfeilsEin Screenshot der PivotTable nach dem Ausblenden der Zwischensummen

Zwischensummen in allen PivotTable von Aktuelles Arbeitsblatt ausblenden oder entfernen

Wenn sich mehrere PivotTables in Ihrem aktuellen Arbeitsblatt befinden und das schrittweise Ausblenden der Zwischensummen mühsam wäre, hilft Ihnen der folgende VBA-Code, die Zwischensummen aus allen PivotTables auf einmal zu entfernen.

1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code in das Modulfenster ein.

VBA-Code: Zwischensummen in allen PivotTable von Aktuelles Arbeitsblatt entfernen

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. Drücken Sie anschließend die Taste F5, um diesen Code auszuführen. Die Zwischensummen in allen PivotTables des aktiven Arbeitsblatts werden sofort entfernt.

Tipp: Wenn Sie die Zwischensummen erneut anzeigen möchten, klicken Sie auf die PivotTable und wählen Sie Entwurf > Zwischensummen am Ende der Gruppe anzeigen / Zwischensummen am Anfang der Gruppe anzeigen.


Verwandte Artikel:

Wie können mehrere Gesamtsummen in einer PivotTable angezeigt werden?

Wie sortiert man in einer PivotTable mithilfe einer benutzerdefinierten Listenreihenfolge?


Beste Office-Produktivitätstools

🤖KUTOOLS AI-Assistent: Revolutionieren Sie Datenanalyse basierend auf:Intelligente Ausführung   |  Code generieren|  benutzerdefinierte Formeln erstellen  |  Daten analysieren und Diagramme erstellen|  Erweiterte Funktionen aufrufen
Beliebte Funktionen:Suchen, hervorheben oder Doppelte markieren   |  Leere Zeilen löschen   |  Spalten kombinieren oder Zellen ohne Datenverlust   |   Runden ohne Formel...
Erweiterte SVERWEIS:VLookup mit mehreren Kriterien  |  VLookup mit mehreren Werten  |   VLookup über mehrere Arbeitsblätter hinweg   |   Fuzzy Match....
Erweiterte Dropdown-Liste:Schnell eine Dropdown-Liste erstellen   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl-Dropdown-Liste....
Spalten-Manager:Eine bestimmte Anzahl von Spalten hinzufügen|Spalten verschieben|Sichtbarkeitsstatus ausgeblendeter Spalten umschalten|Bereiche & Spalten vergleichen...
Hervorgehobene Funktionen:Gitterfokus   |  Entwurf   |Erweiterte Formelleiste   | Arbeitsmappen- & Blatt-Manager   |  Ressourcenbibliothek(AutoText)|  Datumsauswahl   |  Arbeitsblätter konsolidieren  |  Verschlüsseln/Zellen entschlüsseln   | E-Mails per Liste versenden   |  Super Filter   |   Spezialfilter(Zellen mit fettgedruckter Schrift filtern/kursiv/durchgestrichen...) ...
Top-15-Toolsets:12-Text-Tools(Text hinzufügen,Bestimmte Zeichen löschen, ...)|   50+-Diagramm-Typen(Gantt-Diagramm, ...)|   40+ Praktische Formeln(Alter basierend auf dem Geburtstag berechnen, ...)|   19-Einfüge-Tools(QR-Code einfügen,Bild aus Pfad einfügen, ...)|   12-Konvertierungs-Tools(In Wörter umwandeln,Wechselkursumrechnung, ...)|   7-Vereinigen/Aufteilen-Tools(Erweiterte Zeilen zusammenführen,Zellen aufteilen, ...)|... und mehr
Verwenden Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und 40+ weitere Sprachen!

Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...


Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher

  • Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
  • Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!

Alle Kutools-Add-Ins – ein Installationsprogramm

Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.

ExcelWordOutlookTabsPowerPoint
  • Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
  • Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
  • Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
  • 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
  • Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins