Y-Achse skalieren
03.05.2005 16:44:56
CiviSese
Ich habe im Archiv bereits diesen Code gefunden:
Sub Makro()
Range("M20:O89").Select
Charts.Add
ActiveChart.ChartType = xlLineMarkers
ActiveChart.SetSourceData Source:=Sheets("Grafik").Range("N20:O89"), PlotBy _
:=xlColumns
ActiveChart.SeriesCollection(1).XValues = "=Grafik!R20C13:R89C13"
ActiveChart.SeriesCollection(2).XValues = "=Grafik!R20C13:R89C13"
ActiveChart.Axes(xlValue).Select
With ActiveChart.Axes(xlValue)
.MinimumScale = Sheets("BB-Data").Range("D43")
.MaximumScale = Sheets("BB-Data").Range("C43")
.MinorUnitIsAuto = True
.MajorUnitIsAuto = True
.Crosses = xlAutomatic
.ReversePlotOrder = False
.ScaleType = xlLinear
.DisplayUnit = xlNone
End With
End Sub
Der Chart soll aber nicht immer neu erstellt werden (wegen meinen Modifizierungen) sondern immer nur die neuen Werte einlesen (was bereits läuft) und dann die Achse skalieren.
Wie muß obiges aussehen, damit nur die Y-Achse richtig skaliert wird?
Funkioniert dies dann in jedem beliebigem File (also unabhängig vom Dateinamen)?
Danke im voraus!