Office: Diagramm aus Tabellenblatt in Userform als Bild anzeigen lassen

Guten Tag Liebe VBA Profis,

ich brauche eure Hilfe.. *frown.gif*

Ich habe in der Tabelle5 eine Tabelle mit Werten und ein Diagramm ("Diagramm 1". Ich möchte nur das Diagramm auf dem Tabellenblatt als Bild in einer Userform anzeigen lassen.

Außerdem möchte ich, dass es durch ein Commandbutton in dieselbe Userform eingefügt wird, wo sich der Button befindet.

In dieser Userform befindet sich außerdem eine Listview mit Daten zu dem Diagramm. Unterhalb dieser Listview hab ich mithilfe des Steuerlementents 'Anzeige' ein Bereich gezogen, wo das Bild angezeigt werden soll. Aber ich weiß nicht, mit welchem Code man ein Bild in diesen Bereich einfügen kann. Das kann doch nicht so schwer sein??

Ich brauche dringend eure Hilfe um meine Idee in die Tat umzusetzen. Ich habe im Netz gesucht, habe aber nichts Passendes gefunden. Ich hoffe ihr habt verstanden wie ich es haben möchte und könnt mir dabei helfen. Ich bin für jede Hilfe sehr dankbar!!!!

LG, Maxoo

:)

 

Hi,

Code:

Speicherpfad bitte anpassen!!

 

Danke für deine zügige Antwort Beverly!

Was für ein Speicherpfad denn? Das Bild ist doch in einem Tabellenblatt und muss doch lediglich nur kopiert werden, oder etwa nicht?

Und den Code schreibe ist in die Userform oder? *Smilie

Gruß, Maxoo

 

Es hat funktioniert.

Vielen vielen Dank! *Smilie

 

Sorry das ich hier rumspame, aber wie muss ich den Code ändern, damit die Tabelle 5 nicht geöffnet sein muss um den Code durchführen zu können.
Habe es mit folgendem Code versucht, aber es zeigt mir einen Fehler beim Filename an??

Application.Goto ActiveWorkbook.Sheets("Tabelle5").ChartObjects(1).Chart.Export Filename:="U:Z_TestDiagramm1.jpg", Filtername:="JPG"

 

Schreibe in meinem Code anstelle ActiveSheet dieses: Worksheets("Tabelle5")