Größe der Diagrammfläche per VBA einstellen

01/12/2011 - 19:22 von Jürgen Weithöner | Report spam
Hallo,

wie kann ich die Größe der Diagrammflàche per VBA ansprechen und àndern?
Achtung, ich meine die Innere Flàche des eigentlichen Diagrammes, die durch die Achsen aufgespannt wird. Ich meine nicht die gesamte Diagrammflàche.

Hier nochmal eine Abbildung:
https://www.dropbox.com/s/8uqmam6jk...t_area.png
Der ROTE Bereich ist gemeint

Gruß
Jürgen
 

Lesen sie die antworten

#1 Marc Wollersheim
01/12/2011 - 20:10 | Warnen spam
Am 01.12.2011 19:22, schrieb Jürgen Weithöner:
Hallo,

wie kann ich die Größe der Diagrammflàche per VBA ansprechen und àndern?
Achtung, ich meine die Innere Flàche des eigentlichen Diagrammes, die durch die Achsen aufgespannt wird. Ich meine nicht die gesamte Diagrammflàche.

Hier nochmal eine Abbildung:
https://www.dropbox.com/s/8uqmam6jk...t_area.png
Der ROTE Bereich ist gemeint

Gruß
Jürgen



Hallo Jürgen,

kopiere folgenden Code in ein neues Modul und àndere ggf. den
Tabellennamen (im Beispiel "Tabelle1") und ggf. den Namen des Diagramms ab:
Getestet mit Excel 2007. (Hier wàre eine Angabe von Dir sinnvoll gewesen...)

Gruß
Marc
PS: Feedback erwünscht

Option Explicit 'Variablendeklaration erzwingen
'**Code kann in ein Modul hinterlegt werden,mw
Sub Zeichnungsflàche_àndern()

Dim wks As Worksheet
Set wks = Worksheets("Tabelle1") ' hier Tabellenamen àndern

With wks.ChartObjects("Diagramm 1")
ActiveChart.PlotArea.Width = 130 'Breite in Punkten
ActiveChart.PlotArea.Height = 130 'Höhe in Punkten
End With

'Aufràumen
Set wks = Nothing
End Sub

Ähnliche fragen