Diagramm in Diagrammblatt ansprechen
09.02.2018 13:11:50
Martin
ich versuche verzweifelt den Datenbereich eines Diagramms in einem Diagrammblatt zu ändern.
Folgende Codes habe ich bisher ausprobiert:
Variante A:
Diagrammname = "MeinDiagramm"
With Sheets(Diagrammname).ChartObjects(Diagrammname)
.SetSourceData Source:=Range(Cells(3, 2), Cells(Zeile, Spalte))
End With
Diagrammname = "MeinDiagramm"
Sheets(Diagrammname).Select
ActiveChart.SetSourceData Source:=Range(Cells(3, 2), Cells(Zeile, Spalte))
Diagrammname = "MeinDiagramm"
With Worksheets(Diagrammname)
Set chDiagramm = .ChartObjects(Diagrammname).Chart
chDiagramm.SetSourceData Source:=Range(Cells(3, 2), Cells(Zeile, Spalte))
End With
Der Diagrammname und das Tabellenblatt sind laut Excel identisch..."Zeile" und "Spalte" wird vorher ermittelt.
Vielen Dank und viele Grüße
Martin