|
Hallo zusammen,
ich habe ein Problem unter Excel 2010. Ich versuche automatisiert einen XY-Plot zu erstellen. Ich gebe die x- und y-Werte vor. Mache ich das per Hand, wird jedem Punkt eine x- und y-Koordinate zugewiesen was dann einem kreisähnlichen Gebilde entspricht. Unter Verwendung folgenden Codes bekomme ich jedoch nur eine Sinus und Cosinusschwingung (wegen einzelbetrachtung der x- und y-Werte) über die Anzahl der Messpunkte aufgetragen. Das ist vielleicht ein einfaches Ding, ich bekomme es aber einfach nicht hin.
'Diagramm einfügen
Set dia = ActiveSheet.ChartObjects.Add _
(25, 60, 450, 450)
dia.Name = "test"
Range(Cells(3, 35), Cells(3, 36)).Copy
'Range(Cells(3,35), Cells(i - 1, 36)).Copy
ActiveSheet.ChartObjects("test").Activate
ActiveChart.SeriesCollection.Paste _
rowcol:=xlRows, serieslabels:=True, _
categorylabels:=True, Replace:=True, NewSeries:=True
Application.CutCopyMode = False
With ActiveChart
.ChartType = xlLineMarkers
.HasLegend = False
.HasTitle = False
'.PlotBy = xlColumns
End With[/code]
Ich habe schon alles probiert xlrows zu columns etc aber nichts zeigt Wirkung. Was mache ich falsch, würde das Projekt gerne abschließen und scheitere jetzt an einer solchen Kleinigkeit.
Vielen Dank schon mal für eure Hilfe.
Matthias
|