Diagramm erstellen
thomas3
ich habe eine Tabelle, aus der ich ein Diagramm erstellen möchte. Der Bereich dieser Tabelle ist variabel. Das hätte ich so gelöst
'Bereich zum Erstellen des Diagrammes festlegen
lzeile = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
lspalte = ActiveSheet.Cells(2, Columns.Count).End(xlToLeft).Column
Set dbereich = Range(Cells(3, 1), Cells(lzeile, lspalte))
Dann möchte ich das Diagramm erstellen (lassen). Das mache ich so.
'Diagramm erstellen
Sheets("Auswahldaten").Select
Charts.Add
ActiveChart.ChartType = xlLineMarkers
ActiveChart.SetSourceData Source:=Sheets("Auswahldaten").Range(dbereich), _
PlotBy:=xlRows
und da bleibe ich hängen.
Mit dem Range(dbereich) kommt das Makro nicht zurecht.
Wüßte bitte jemand warum?
Freue mich für jeden Hinweis.
Thomas
Anzeige