HERBERS Excel-Forum - die Beispiele

Thema: Diagramm in Userform

Home

Gruppe

Dialog

Problem

Wie kann ich in eine Userform ein Diagramm einfügen?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain

Sub GrafikInUserForm()
   Const csMsg As String = "Die Statistikgrafik kann nicht " & _
      "auf CD-ROM gespeichert werden. Speichern Sie die " & _
      "Arbeitsmappe auf Ihrer Festplatte und versuchen " & _
      "Sie es erneut."
   Dim sFile As String
   sFile = ThisWorkbook.Path & "\Statistik.gif"
   On Error GoTo ERRORHANDLER
   ActiveWorkbook.Charts(1).Export sFile
   With frmChart
      .imgChart.Picture = LoadPicture(sFile)
      .imgChart.PictureSizeMode = fmPictureSizeModeZoom
      .Show
   End With
   Kill sFile
   Exit Sub
ERRORHANDLER:
   MsgBox prompt:=csMsg
End Sub

ClassModule: frmChart

Private Sub cmdOK_Click()
   Unload Me
End Sub

Beiträge aus dem Excel-Forum zu den Themen Dialog und Diagramm

Diagramm mit vba erstellen Diagramm-Datenpunkte mit neuem Diagramm verküpfen
Diagramme in PowerPoint mit VBA neu befüllen Dynamischer Datenbereich im Diagramm
Kartendiagramm per VBA erstellen und formatieren VBA: Dynamisches Diagramm mit bestimmten Zellberei
Gestapelte Säulen-Diagramm: Ich kapier's nicht 3D-DIagramme
Hilfe bei Diagramm zu PowerPoint VBA Diagramme nach mehreren Balken filtern
fehlerhaftes Punktdiagramm(XY) Diagramme und ihr Format
xlDialogInsertHyperlink.show #NV im Kreisdiagramm
Diagrammquelle in Werte umwandeln mit VBA? gestapeltes Balkendiagramm
"Gestapelte Säulen" Diagramm nebeneinander? Formatierung anderer Diagramme
Dynamisieren - Gleiches Diagramm für alle Blätter Balkendiagramm - Farbflächen in den Hintergund?
Balkendiagramm: 2 Balken voreinander darstellen spezielles Diagramm
Linien-Säulendiagramm auf 2 Achsen Diagrammformatierung übertragen
Arbeitmappen über Dialogfeld zusammen fassen Skalierung Balkendiagramm
Diagrammgröße Diagramme DIN A3 drucken
Werte aus Usf-Berechnung für Diagramm fehlerhaft! 0-Wert im Diagramm unsichtbar machen
Diagramm erkennen Achsen für Exceldiagramm autom. anpassen
Frage zu Diagrammdarstellung Skalierung Diagramm
Excel - Diagramme Benötige Hilfe bei Diagrammen
Fortsetzung Linienfarbe ändern Diagramm dynamische Datenquelle Diagramm
Farbänderung bei Liniendiagramm Mit einem Makro ein Diagramm löschen
5.0 Dialog Diagramm – Zweite Rubrikenachse
Zweite Y-Achse in Exceldiagramm Leere Zellen interpolieren in Diagramm
Diagramm auf Landkarte Skalierung von Diagrammachsen
Achsen für Exceldiagramm autom. anpassen leeres Diagramm wenn kein Autoscale
Speichern unter Dialog in Word aufrufen inkl. Pfad Diagramm Vergleich Werte A mit Werte B+C