Ich möchte die Daten für ein Diagramm ändern. Das Diagramm ist fest, es sollen nur die Daten geändert werden. Diese Daten liegen aber in 2 Zellen, die nicht nebeneinander liegen.
Die Quellen habe ich manuell aus dem Diagramm-Menu in Excel herauskopiert.
With Sheets("Kompetenzbericht").ChartObjects("Diagramm 4").Chart
SeriesCollection(1).XValues = "=Hilfstabelle!$L$5;Hilfstabelle!$O$5"
.SeriesCollection(1).Values = "=Hilfstabelle!$L$6;Hilfstabelle!$O$6"
.SeriesCollection(2).Values = "=Hilfstabelle!$L$8;Hilfstabelle!$O$8"
.SeriesCollection(3).Values = "=Hilfstabelle!$L$7;Hilfstabelle!$O$7"
.SeriesCollection(4).Values = "=Hilfstabelle!$L$9;Hilfstabelle!$O$9"
.SeriesCollection(5).Values = "=Hilfstabelle!$L$10;Hilfstabelle!$O$10"
End With
Bei 2 Zeilen die nebeneinander liegen funktioniert es.
With Sheets("Kompetenzbericht").ChartObjects("Diagramm 5").Chart
.SeriesCollection(1).XValues = "=Hilfstabelle!$S$5:$T$5"
.SeriesCollection(1).Values = "=Hilfstabelle!$S$6:$T$6"
.SeriesCollection(2).Values = "=Hilfstabelle!$S$8:$T$8"
.SeriesCollection(3).Values = "=Hilfstabelle!$S$7:$T$7"
.SeriesCollection(4).Values = "=Hilfstabelle!$S$9:$T$9"
.SeriesCollection(5).Values = "=Hilfstabelle!$S$10:$T$10"
End With
Ich habe auch schon versucht die Quelle mit Cells(5, 12) usw. anzusprechen, aber ich habe es nicht hinbekommen. Kennt sich da jemand aus und kann mir helfen?
Vielen Dank und beste Grüße
Rafa