Weiß einer, wie ich folgenden Code, so gestalten kann, dass er 
nicht den Range A17:I17 nimmt, sondern die letzte Zeile findet, sie kopiert und dann das Dia aktualisiert.
Habe das mit meinem 08-15 Wissen selbst versucht, bringe aber scheinbar das Gesamtgefüge so durcheinander, dass er nicht mehr weiß, was ich will. Kann jemand helfen ?
 
Sub Makro()
'
    ActiveChart.SeriesCollection.Extend Source:=Sheets("Tabelle1").Range( _
        "A17:I17"), Rowcol:=xlColumns, CategoryLabels:=True
End Sub