PivotChart erstellen mit VBA in Excel
Schritt-für-Schritt-Anleitung
Um ein Excel Pivot Chart per VBA zu erstellen, kannst du folgende Schritte befolgen:
-
Öffne den VBA-Editor: Drücke ALT + F11
, um den VBA-Editor zu öffnen.
-
Füge ein neues Modul hinzu: Rechtsklicke auf "VBAProject (DeineDatei.xlsx)" und wähle Einfügen > Modul
.
-
Gib den folgenden Code ein:
Sub ErstellePivotChart()
Dim piv As PivotTable
' Setze hier den Bezug zu deiner PivotTable
Set piv = ThisWorkbook.Sheets("DeinBlatt").PivotTables("DeinePivotTabelle")
' Erstelle das PivotChart
Charts.Add
ActiveChart.Location Where:=xlLocationAsNewSheet
ActiveChart.SetSourceData Source:=piv.TableRange1
End Sub
-
Führe das Makro aus: Drücke F5
, um das Makro auszuführen und dein Pivot Chart zu erstellen.
Dieser Code setzt voraus, dass du bereits eine Pivot-Tabelle erstellt hast. Achte darauf, die Namen des Arbeitsblatts und der Pivot-Tabelle entsprechend anzupassen.
Häufige Fehler und Lösungen
Alternative Methoden
Eine weitere Möglichkeit, einen PivotChart zu erstellen, ist die Verwendung des Excel-Menüs:
- Markiere die Pivot-Tabelle.
- Gehe zu
Einfügen > Diagramm
.
- Wähle den Diagrammtyp aus und klicke auf "OK".
Diese Methode ist besonders nützlich, wenn du visuelle Anpassungen vornehmen möchtest.
Praktische Beispiele
Wenn du eine Pivot-Tabelle mit Verkaufsdaten hast, kannst du mit dem obigen VBA-Code ein Pivot Chart erstellen, das die Umsätze nach Produktkategorie darstellt. Das Diagramm wird automatisch auf einem neuen Arbeitsblatt platziert.
Hier ein Beispiel, wie du es anpassen kannst:
Sub UmsatzPivotChart()
Dim piv As PivotTable
Set piv = ThisWorkbook.Sheets("Verkaufsdaten").PivotTables("PivotVerkäufe")
Charts.Add
ActiveChart.Location Where:=xlLocationAsNewSheet
ActiveChart.SetSourceData Source:=piv.TableRange1
ActiveChart.ChartType = xlColumnClustered ' Beispiel für Diagrammtyp
End Sub
Tipps für Profis
- Verwende die
PivotChart
-Objekte, um das Diagramm direkt aus der Pivot-Tabelle zu erstellen, anstatt ein separates Chart-Objekt zu erzeugen.
- Experimentiere mit verschiedenen Diagrammtypen, um die beste Darstellung deiner Daten zu finden.
- Dokumentiere deinen VBA-Code gut, um zukünftig Anpassungen einfacher vorzunehmen.
FAQ: Häufige Fragen
1. Wie kann ich ein normales Diagramm aus einer Pivot-Tabelle erstellen?
Du kannst die Pivot-Tabelle markieren und dann über das Menü Einfügen
ein normales Diagramm auswählen. Alternativ kannst du auch VBA verwenden und den Diagrammtyp anpassen.
2. Funktioniert dieser Code in allen Excel-Versionen?
Der gezeigte VBA-Code sollte in den meisten modernen Excel-Versionen (ab Excel 2010) funktionieren. Achte darauf, dass die Objektbibliothek für VBA aktiviert ist.