Hallo,
danke schon mal für Deine Mühen. Nur kennt mein Excel das Objekt Chartspace nicht. Gibt es da nicht eine Lösung ohne das Objekt. Denn ich stelle die Datei mehreren Usern zur Verfügung und müsste dann vorher überall dieses Chartspace aktivieren.
Ich denke es ist ein Steuerelement. Wie heisst denn das genau, damit ich es finde?
Gibt es nicht eine Lösung das man das Diagramm als Gif speichert und dann als Image lädt.
Was meinst Du wäre sinnvoller?
MfG
Holger Wächter
Anzeige
AW: Diagramm in UserForm
18.07.2005 18:21:40
Nepumuk
Servus Holger,
das Control heißt Microsoft Office Chart und ist Bestandteil von Office. Dazu müssen aber die "Office - Web Components" bei der Installation von Office aktiviert werden. Die kannst du ganz leicht nachinstallieren.
Die Lösung mit Export - Import bringst du sicher selbst auf die Reihe. Frag deinen Assi nach "Export-Methode".
Gruß
Nepumuk Excel & VBA Beispiele
AW: Diagramm in UserForm
18.07.2005 18:47:33
Holger
Alles klar, danke dafür. Da das Programm bei mir auf der Firma läuft, muss ich mal schauen ob die das für mich nachinstallieren, ansonsten halt export/import...
Will ja jetzt nicht blöd klingen, aber kenn die "Assi"-Abkürzung nicht!
Vielleicht hast ja auch für den Expot kurz eien Beispieldatei zur Hand?
MfG
Holger Wächter
Anzeige
AW: Diagramm in UserForm
18.07.2005 18:59:45
Nepumuk
Hi Holger,
ASSI = der Office - Assistent. Das kleine putzige Ding, das dauernd gelangweilt im Weg steht.
Beispielcode: PrivateSub UserForm_Activate() Tabelle2.ChartObjects(1).Chart.Export _ Filename:="c:\temp\chart.gif", FilterName:="GIF" With Image1 .PictureSizeMode = fmPictureSizeModeZoom .Picture = LoadPicture("c:\temp\chart.gif") EndWith EndSub
Eher befriedigend, aber das hat Herber ja nicht zur Auswahl. Ich komme mit dem Teil nicht klar:
Tabelle2.ChartObject(1)
Tabelle2 ist klar. Das Chart muss im Blattregister Tabelle2 sein. Aber mit der "1" in der
Klammer komme ich nicht klar, denn der findet das Diagramm nicht in meiner Exceltabelle. Muss ich anstatt der 1 was anderes schreiben, oder den Namen des Diagramms?
MfG
Holger Wächter
AW: Diagramm in UserForm
18.07.2005 19:39:05
Nepumuk
Ach Holger,
dann schreib es so: Worksheets("Tabelle2").ChartObjects("Diagramm 1").Chart.Export _ Filename:="c:\temp\chart.gif", FilterName:="GIF"
Wenn du den Namen des Diagramms nicht kennst, dann irgendeine Zelle anklicken - Makro aufzeichnen - Diagramm anklicken - Aufzeichnung beenden und das Makro ansehen.
Gruß
Nepumuk Excel & VBA Beispiele
Anzeige
AW: Diagramm in UserForm
18.07.2005 19:46:22
Holger
Danke für Deine ganzen Hilfen. Hast mir echt weiter geholfen und jetzt bin ich auch wieder etwas schlauer geworden...
MfG
Holger Wächter