Hallo Matthias G,
noch ne Frage.
Wie kann ich ein Diagramm, das ich automatisch erstellt habe, automatisch auf eine bestimmte Größe Formatieren.
Danke schon mal.
Gruß
Matthias
Sub Diagr_mit_best_Grösse()
Dim cht As ChartObject
Set cht = Worksheets("Tabelle1").ChartObjects.Add(200, 120, 500, 280)
'200 = linker Abstand
'120 = oberer Abstand
'500 = Diagrammbreite
'280 = Diagrammhöhe
With cht.Chart
'---
'---
End With
End Sub