Hallo miteinander,
ich habe mit VBA ein Diagramm erstellt. Ich habe in dem Code die X-Werte sowie auch eine Datenbeschriftung hinzugefügt.
Allderings beschriftet mir das Makro immer nur für den ersten Y-Wert den zugehörigen x-Wert sowie gibt die Datenbeschriftung an.
Ich dachte mich SeriesCollection(1) kann ich auf die gesamte Datenreihe zugreifen; allerdings nimmt es immer nur den ersten Wert :/
Set rngAnteil = Range(Worksheets(blatt2).Cells(q + 5, 2), Worksheets(blatt2).Cells(q + 5, 16))
Set rngVorgänge = Range(Worksheets(blatt2).Cells(q + 3, 2), Worksheets(blatt2).Cells(q + 3, 16))
o = Worksheets(blatt2).Cells(q + 8, 2).Left
y = Worksheets(blatt2).Cells(q + 8, 2).Top
Set cht1 = Worksheets(blatt2).ChartObjects.Add(o, y, 280, 320)
With cht1.Chart
.SetSourceData Source:=rngAnteil, PlotBy:=xlColumns
.ChartType = xlColumnClustered
.HasLegend = False
.HasTitle = True
.ChartTitle.Text = "Kommissionierung - Anteil pro Autrag"
.ChartTitle.Font.Size = 10
.SeriesCollection(1).HasDataLabels = True
.SeriesCollection(1).XValues = rngVorgänge
End With
Also es geht im um die vorletzten beiden Zeilen.
Wie kann ich die gestamte Datenreihe ansprechen, die von Spalte 2 bis 16 geht und somit eigentlich 15 Werte umfasst.
Hat jemand eine Idee?
Schöne Grüße
Heike
|