Office: Datenreihen in bestehendem Chart einfügen

Hallo Ihr alle,
hab ein bestehendes Chart. Da kann ich auch problemlos Daten einfügen. Allerdings würde ich gerne, dass die Daten gesplittet werden in 3 Linien (Liniendiagramm). Momentan macht er mir nur eine Linie daraus. Mein Quelltext:

Sub UpdateChart2()
Dim TheChartObj As ChartObject
Dim TheChart As Chart
Dim CatTitles As Range
Dim SrcRange As Range
Dim SourceData As Range
Dim UserRow As long

UserRow = ActiveCell.Row
Set TheChartObj = ActiveSheet.ChartObjects(1)
Set TheChart = TheChartObj.Chart
Set CatTitles = Range("A2:BC2")
Set SrcRange = Range(Cells(UserRow, 1), Cells(UserRow, 55))
Set SourceData = Union(CatTitles, SrcRange)
TheChart.SetSourceData _
Source:=SourceData, PlotBy:=xlRows
TheChartObj.Visible = True

End Sub

Es soll aus der SourceData A:BC 3 Reihen gemacht werden: in A steht der Diagrammtitel, 1.Reihe B:S, 2.Reihe T:AK, 3.Reihe AL:BC. Irgendwie bekomme ich den Befehl SeriesCollection nicht richtig eingebaut. Wer kann helfen?

Danke

Daniel

:)

 

Hi Daniel,

vielleicht hilft dir diese Ergänzung deines Codes als Anregung weiter
Code:

 

Hallo,

Vielen Dank schon einmal. Was bedeutet den R2Cx und R3Cx in den SeriesCollection? Da stimmt noch was nicht. bekomme Fehlermeldung. Was sollen denn die Werte zurückgeben? Das sind ja keine Zellenbezeichnungen, oder?

Danke

Daniel

 

Hi Daniel,

doch, es sind Zellenbereichnungen. R steht für Row und C für Column. Schau mal in der Onlinehilfe unter Range (Auflistung) nach. Ein Diagramm verlangt diese Angabe der Zellbezüge explizit - eine andere Schreibweise funktioniert meines Wissens nicht. Ich lasse mich aber gern eines Besseren belehren.

Ich habe leider nicht deine Originaltabelle zur Verfügung gehabt, deshalb konnte ich nur eine simple Beispielmappe nachbauen und den Code nur unter meinen Bedingungen testen. Und dort lief er fehlerfrei.

 

Hallo Karin,
wir nähern uns dem Ziel. Ich habe bereits erreicht, dass 3 Reihen angezeigt werden. Allerdings falsch :-(
Er addiert die Werte. Also ist die 1.Reihe noch super. Die 2. Allerdings sind die richtigen Werte addiert mit den der 1.Reihe und die 3.Reihe hat einfach alle Werte addiert. Würden sich die Werte nicht addieren, wäre die Grafik perfekt.

Danke
Daniel

 

Man sieht vor lauter Bäumen den Wald nicht mehr. Muss ja nur den Diagrammtyp ändern.

Danke
Daniel