Excel ist sehr praktisch beim Erstellen von Diagrammen aus Daten in einem Arbeitsblatt. Was ist, wenn Sie ein Diagramm direkt aus VBA erstellen möchten, ohne Daten in einem Arbeitsblatt zu verwenden? Sie können dies tun, indem Sie Excel „täuschen“, dass es mit Informationen aus einem Arbeitsblatt arbeitet, und dann Ihre eigenen bereitstellen.

Das folgende Makro veranschaulicht dieses Konzept:

Sub MakeChart()

'Add a new chart     Charts.Add

'Set the dummy data range for the chart     ActiveChart.SetSourceData Sheets("Sheet1").Range("a1:d4"), _       PlotBy:=xlColumns

'Manually set the values for the data series     ActiveChart.SeriesCollection(1).Formula = _       "=SERIES(""First Data"",{""a"",""b"",""c"",""d""},{2,3,4,5},1)"

ActiveChart.SeriesCollection(2).Formula = _       "=SERIES(""Second Data"",{""a"",""b"",""c"",""d""},{6,7,8,9},2)"

ActiveChart.SeriesCollection(3).Formula = _       "=SERIES(""Third Data"",{""a"",""b"",""c"",""d""},{10,11,12,13},3)"

End Sub

Die Kommentare in diesem Beispiel erklären, was für jeden Schritt vor sich geht.

Beim Festlegen des Dummy-Datenbereichs geht die SetSourceData-Methode davon aus, dass sich der Bereich in einem Arbeitsblatt mit dem Namen Sheet1 befindet. Wenn Sie kein solches Blatt in Ihrer Arbeitsmappe haben, müssen Sie den Befehl entsprechend ändern.

Wenn Sie später die Werte für die Datenreihe manuell festlegen, wird mit dem Befehl SERIES die Bezeichnung für die Reihe (Erste Daten, Zweite Daten und Dritte Daten), das Array der Kategoriebezeichnungen (a, b, c und d) angegeben in allen Serien), das Array von Werten für die Serie und eine Zahl, die angibt, welche Seriennummer dies darstellt.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (10347) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365. Eine Version dieses Tippes für die ältere Menüoberfläche von Excel finden Sie hier:

Diagramme in VBA erstellen.