Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Pivot Spaltenüberschriften ändern/anpassen

Forumthread: Pivot Spaltenüberschriften ändern/anpassen

Pivot Spaltenüberschriften ändern/anpassen
Alex
Hallo,
ich hab mal ne Frage bzgl. einer Pivottabelle:
Schon seit längerem ärgere ich mich damit rum, dass beim Erstellen einer Pivottabelle die Spaltenüberschriften sich automatisch "anpassen", beispielsweise in "Summe von Umsatz".
Kann ich das irgendwie unterdrücken? Also dass meine Spalte auch nachher nur "Umsatz" heißt, ohne diesen Vorsatz?
Danke schon mal für die Hilfe
Alex
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Pivot Spaltenüberschriften ändern/anpassen
26.05.2010 16:21:18
Rudi
Hallo,
das lässt sich imho nicht abstellen.
Nachträgliche Änderung:
Sub SummeVonLoeschen()
'"Summe von", "Anzahl von" etc.  aus Datenfeldbezeichnungen löschen
Dim pi As PivotItem, iStart As Integer, pt As PivotTable
Application.ScreenUpdating = False
For Each pt In ActiveSheet.PivotTables
For Each pi In pt.DataPivotField.PivotItems
iStart = InStr(pi.Name, "von")
If iStart > 0 Then
pi.Caption = Replace(pi.Name, Left(pi.Name, iStart + 2), "", , 1)
End If
Next
Next
Application.ScreenUpdating = True
End Sub

Gruß
Rudi
Anzeige
AW: Pivot Spaltenüberschriften ändern/anpassen
26.05.2010 16:24:14
Alex
Danke für den Code, funktioniert wunderbar.
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Pivot Spaltenüberschriften anpassen in Excel


Schritt-für-Schritt-Anleitung

Um die Spaltenüberschriften in einer Pivot-Tabelle zu ändern, kannst Du die folgenden Schritte befolgen:

  1. Pivot-Tabelle erstellen: Stelle sicher, dass Du eine Pivot-Tabelle in Excel erstellt hast. Gehe dazu auf Einfügen > PivotTable.

  2. Datenfeld hinzufügen: Füge das Datenfeld (z.B. "Umsatz") zu den Werten der Pivot-Tabelle hinzu.

  3. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  4. Neues Modul einfügen: Klicke mit der rechten Maustaste auf „VBAProject (deine Arbeitsmappe)“ > Einfügen > Modul.

  5. Code einfügen: Kopiere den folgenden VBA-Code in das Modul:

    Sub SummeVonLoeschen()
        ' "Summe von", "Anzahl von" etc. aus Datenfeldbezeichnungen löschen
        Dim pi As PivotItem, iStart As Integer, pt As PivotTable
        Application.ScreenUpdating = False
        For Each pt In ActiveSheet.PivotTables
            For Each pi In pt.DataPivotField.PivotItems
                iStart = InStr(pi.Name, "von")
                If iStart > 0 Then
                    pi.Caption = Replace(pi.Name, Left(pi.Name, iStart + 2), "", , 1)
                End If
            Next
        Next
        Application.ScreenUpdating = True
    End Sub
  6. Makro ausführen: Schließe den VBA-Editor und gehe zurück zu Excel. Drücke ALT + F8, wähle das Makro SummeVonLoeschen aus und klicke auf Ausführen.

  7. Überprüfung: Überprüfe die Pivot-Tabelle, um sicherzustellen, dass die Spaltenüberschriften wie gewünscht geändert wurden.


Häufige Fehler und Lösungen

  • Fehler: "Das Makro kann nicht gefunden werden"
    Lösung: Stelle sicher, dass Du das Makro korrekt eingegeben hast und es im richtigen Modul gespeichert ist.

  • Fehler: Änderungen werden nicht angezeigt
    Lösung: Überprüfe, ob Du die Pivot-Tabelle aktualisiert hast. Klicke mit der rechten Maustaste auf die Pivot-Tabelle und wähle Aktualisieren.


Alternative Methoden

Falls Du keine VBA-Programmierung verwenden möchtest, kannst Du auch die folgenden Methoden ausprobieren:

  • Manuelle Anpassung: Klicke in die Überschrift der Pivot-Tabelle und gebe den gewünschten Namen direkt ein. Dies funktioniert jedoch nur für die Darstellung und nicht für die originale Datenquelle.

  • PivotTable-Optionen: Klicke mit der rechten Maustaste auf die Pivot-Tabelle, wähle PivotTable-Optionen und ändere die Beschriftung. Diese Änderung ist jedoch nicht immer dauerhaft.


Praktische Beispiele

Angenommen, Du hast eine Pivot-Tabelle mit den Spaltenüberschriften "Summe von Umsatz" und möchtest diese in "Umsatz" umbenennen. Verwende den oben beschriebenen VBA-Code, um die Spaltenüberschrift schnell zu ändern.

Ein weiteres Beispiel ist eine Pivot-Tabelle, die die Anzahl der Verkäufe anzeigt. Der Code würde auch hier die Überschrift von "Anzahl von Verkäufen" auf "Verkäufe" ändern.


Tipps für Profis

  • Automatisierung: Du kannst das Makro so anpassen, dass es automatisch beim Öffnen der Datei ausgeführt wird, um die Spaltenüberschriften immer zu aktualisieren.

  • Eingabe von mehreren Feldern: Du kannst den VBA-Code erweitern, um mehrere Datenfelder auf einmal zu bearbeiten, indem Du die Schleife entsprechend anpasst.


FAQ: Häufige Fragen

1. Kann ich die Spaltenüberschriften in einer Pivot-Tabelle manuell ändern?
Ja, Du kannst die Überschriften manuell ändern, allerdings wird diese Änderung nicht in der Datenquelle gespeichert.

2. Funktioniert dies auch in Excel 365?
Ja, der beschriebene Prozess funktioniert in Excel 365 sowie in anderen Versionen, die VBA unterstützen.

3. Gibt es eine Möglichkeit, die Änderungen rückgängig zu machen?
Ja, Du kannst die Pivot-Tabelle einfach aktualisieren, um die ursprünglichen Überschriften wiederherzustellen, oder Du kannst das Makro anpassen, um die ursprünglichen Namen zu speichern.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige