kann mir jemand einen VBA- Code geben mit dem ich ein Diagramm aus einem Sheet in einer UF anzeigen kann!
Danke im Voraus! Gruß Uwe
Sub diagramm_userform()
Dim chDiagramm As ChartObject
Set chDiagramm = ActiveSheet.ChartObjects(1)
chDiagramm.Chart.Export "dia.jpg"
With frmDia.imgDia
.Picture = LoadPicture("dia.jpg")
.AutoSize = True
End With
frmDia.Show
Kill "dia.jpg"
End Sub