wie kann ich ein Diagramm, dass aus Daten in einer Exceltabelle entsteht und in diesem Blatt zu finden ist, in einem Userform einbinden?
MfG
Steve
Private Sub UserForm_Activate()
Set Diagramm = Sheets("Tabelle1").ChartObjects(1).Chart
Diagramm.Parent.Width = Image1.Width
Diagramm.Parent.Height = Image1.Height
Dateiname = ThisWorkbook.Path & Application.PathSeparator & "diagramm.gif"
Diagramm.Export Filename:=Dateiname, FilterName:="GIF"
Image1.Picture = LoadPicture(Dateiname)
End Sub
Private Sub cmdEnde_Click()
Kill Dateiname
Unload Me
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen