Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA, Diagrammgröße automatisch ändern

VBA, Diagrammgröße automatisch ändern
03.04.2006 17:51:48
Matthias
Hallo Forum,
ich möchte mit Hilfe einer VBA ein Diagramm erstellen lassen (als Objekt in der Mappe), das funktioniert soweit auch einwandfrei. Jetzt möchte ich aber das erzeugte Diagramm auch automatisch auf eine bestimmte Größe formatieren.
Der Makro-Recorder liefert einem hierfür folgendes,
_______________________________________________
ActiveSheet.Shapes("Diagramm 25").ScaleWidth 1.33, msoFalse, _
msoScaleFromTopLeft
ActiveSheet.Shapes("Diagramm 25").ScaleHeight 1.28, msoFalse, _
msoScaleFromTopLeft
_______________________________________________
das nützt einem aber nichts, weil da jedes neue Diagramm einen neuen Namen bekommt (hier "Diagramm 25").
Ich bin für jede Hilfe dankbar.
Gruß
Matthias
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA, Diagrammgröße automatisch ändern
03.04.2006 18:54:51
Herbert
hallo Matthias,


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

     gruß Herbert
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige