variable Range definieren
13.04.2008 16:41:55
Köhler
ich möchte aus einer ständig wechselnden Range per command button ein diagram erstellen.
Dazu hätte ich 2 Fragen:
1) warum erscheint bei folgendem code der error 1004 "Die Methode 'Range' für das Objekt '_Global' ist fehlgeschlagen.
2) wie kann ich erreichen, dass nur die values in den Zellen beachtet werden, nicht die zugrundeliegenden Formeln?
Vielen vielen dank schon mal für die Hilfe!
Sub Schaltfläche3_BeiKlick()
Range(Range("b4").End(xlDown), Range("b4").End(xlToRight)).Select
Charts.Add
ActiveChart.ChartType = xlLineMarkers
ActiveChart.SetSourceData Source:=Sheets("A Matiz"). _
Range(Range("b4").End(xlDown), Range("b4").End(xlToRight)), PlotBy :=xlRows
ActiveChart.Location Where:=xlLocationAsObject, Name:="A Matiz"
With ActiveChart
.HasTitle = False
.Axes(xlCategory, xlPrimary).HasTitle = False
.Axes(xlValue, xlPrimary).HasTitle = False
End With
End Sub