Hallo!
Ich habe ein vielleicht unübliches Problem...
Für einen Prüfstand habe ich ein kleines Daten-Analyseprogramm geschrieben. Man lädt zuerst über eine Filterfunktion die gewünschten Messungen in eine Tabelle. Das können dann natürlich nur 2 oder auch 200 Messungen sein (die alle unterschiedlich viele Messdaten, sprich Zeilen in der jeweiligen Spalte, haben). Deshalb muss ich bei der Diagrammerstellung eine Messung nach der anderen dem Diagramm hinzufügen.
Das sieht dann so aus:
For j = 1 To LetzteSpalte
AktuelleSpalte = j
Tabelle3.Activate
LetzteZeileAktuell_Sub
Diagramm.Activate
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(j).Values = "=Daten_Diagramm!R10C" & j & ":R" & LetzteZeile & "C" & j
ActiveChart.SeriesCollection(j).Name = "=Daten_Diagramm!R1C" & j & ":R9C" & j
ActiveChart.SeriesCollection(j).XValues = "=Daten_Diagramm!R10C" & LetzteSpalte + 1 & ":R" & LetzteZeile & "C" & LetzteSpalte + 1
ActiveChart.SeriesCollection(j).Select
With Selection
.MarkerStyle = xlNone
End With
Next j
Funktioniert jedenfalls wunderbar in Excel 2003. Jetzt habe ich auf Excel 2007 umgestellt und es funktioniert noch immer wunderbar, nur dass statt den richtigen Datenbeschriftungen immer nur "Datenreihen1, Datenreihen2, ...." steht. Wenn ich das Makro bei der Umbenennung der Datenreihen aufzeichnen lasse ist das ident, nur dass ich natürlich meine dynamischen Spaltenwerte einbauen muss. Bei allen anderen Funktionen funktioniert das auch super, nur bei Excel 2007 bei der Datenreihenbeschriftung nicht mehr.
Vielleicht weiß wer weiter, wäre ich sehr dankbar!
Schöne Grüße, Stefan
P.S. Mir ist klar, dass das vielleicht nicht die schönste Variante ist, mein Problem zu lösen. Aber mit Pivot-Diagrammen hab ich es nicht geschafft, weil ich eine Datenreihe immer in einer Spalte und nicht in einer Zeile habe und bei allen anderen Varianten waren meine Nerven ebenfalls verbraucht, bevor ich ein akzeptables Ergebnis hatte. |