Wie Datenpunktwerte in Graphen einfügen?
16.08.2021 15:27:15
AleXSR700
ich starte einen neuen Thread, weil das Plotten von Graphen doch eine eigene Geschichte ist.
Ich erzeuge gerade Graphen aus meinen Excels. Soweit auch halbwegs erfolgreich.
Allerdings habe ich zwei Probleme:
1. Ich schaffe es nicht, dass wenn die y-Werte nicht neben den x-Werten stehen, er dennoch nur dieses eine Wertepaar darstellt. Excel plottet mir dann einen Graphen pro Spalte. Wie man sieht, ist rngz1 neben den x-Werten. Ergibt also nur eine Kurve. rngz2 ist jedoch 3 Spalten weiter und ergibt somit drei Kurven. Gewollt ist nur eine.
Set rngdate = Range(sipdate, Cells(40, 3))
Set rngz1 = Range(z1, Cells(40, 4))
Set rngz2 = Range(z2, Cells(40, 6))
Set cht = ActiveSheet.ChartObjects.Add(Left:=ActiveCell.Left, Width:=600, Top:=ActiveCell.Top, Height:=400)
cht.Chart.SetSourceData Source:=Union(rngdate, rngz1)
cht.Chart.ChartType = xlLineMarkers
cht.Chart.Axes(xlValue).MinimumScale = 0
cht.Chart.Axes(xlValue).MaximumScale = suspect1.Offset(0, 2)
''' Z-2 chart
Set rngz2 = Range(z2, Cells(40, 6))
Set cht = ActiveSheet.ChartObjects.Add(Left:=ActiveCell.Left, Width:=450, Top:=ActiveCell.Top, Height:=250)
cht.Chart.SetSourceData Source:=Range(rngdate, rngz2)
cht.Chart.ChartType = xlLineMarkers
cht.Chart.Axes(xlValue).MinimumScale = 0
cht.Chart.Axes(xlValue).MaximumScale = suspect2.Offset(0, 2)
Ich möchte in jedem Graphen einen Grenzwert als Linie eintragen. Sprich, eine Kurve, die für alle X-Werte den gleichen Y-Wert hat.
Kann man irgendwie in die oberen beiden Graphen diese Linie einfügen, ohne in die Tabelle irgendwelche Werte einzutragen?
Vielen herzlichen Dank für eure Hilfe :)
Alex
