Ich moechte meinen Diagrammbereich (letzte Zeilen) (seit geraumer Zeit) dynamisch gestalten . Wo liegt mein Problem? Warum frisst der das nicht? Bin ratlos!
Bitte um eine Idee? Wie muss ich diese letzte Zeile da reinbringen?
Sub Diagrammbereich()
Dim letzte_x As Long
Dim letzte_y As Long
letzte_x = Range("D250").End(xlUp).Row
letzte_y = Range("E250").End(xlUp).Row
Sheets("Report").Select
ActiveSheet.ChartObjects("Chart 5").Activate
ActiveChart.ChartArea.Select
ActiveChart.SeriesCollection(1).XValues = "=Report!R17C4: & letzte_x"
ActiveChart.SeriesCollection(1).Values = "=Report!R17C5: & letzte_y"
End Sub
Gruss Olli