Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
748to752
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
748to752
748to752
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

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

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

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige