Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema RefEdit
BildScreenshot zu RefEdit RefEdit-Seite mit Beispielarbeitsmappe aufrufen

Bereich als Grafik speichern

Betrifft: Bereich als Grafik speichern von: Jonathan
Geschrieben am: 09.07.2008 23:46:55

Hey,

ich habe es geschafft, ein Chart als Grafik zu speichern und in einer UF einzubinden - ist es auch möglich, den markierten Bereich als Grafik zu speichern?

Habe im Inet leider nichts gefunden!

Danke Euch!

  

Betrifft: AW: Bereich als Grafik speichern von: Daniel
Geschrieben am: 10.07.2008 00:02:31

Hi
zur Not könnte folgender Workaround funktionieren:

- leeres Diagramm erstellen
- vom Zellbereich eine Bildkopie erstellen (als VBA: Range("..").CopyPicture, in Excel über SHIFT + BEARBEITEN - BILD KOPIEREN)
- diese Bildkopie ins Chart einfügen
- und dann wie bekannt das Chart als Grafik speichern und in die Userform einfügen.

ich habe es nicht getestet, da ich die Funktion zum Speichern des Charts als Grafik nicht kenne, aber viellicht gehts.

Gruß, Daniel


  

Betrifft: AW: Bereich als Grafik speichern von: Beverly
Geschrieben am: 10.07.2008 07:54:46

Hi Jonathan,

Sub tabellenausschnitt_exportieren()
    Dim chDiagramm As ChartObject
    Dim shBild As Shape
    Application.ScreenUpdating = False
    Selection.CopyPicture Appearance:=xlPrinter, Format:=xlPicture
    ActiveSheet.Paste
    Set shBild = ActiveSheet.Shapes(ActiveSheet.Shapes.Count)
    Set chDiagramm = ActiveSheet.ChartObjects.Add(0, 0, shBild.Width, shBild.Height)
    With chDiagramm.Chart
        .Paste
        .Export Filename:="C:\Test\Bild.png", FilterName:="PNG" ' andere Grafikformate sind mö _
glich
    End With
    chDiagramm.Delete
    Set chDiagramm = Nothing
    Set shBild = Nothing
    Application.ScreenUpdating = True
End Sub





GrußformelBeverly's Excel - Inn


  

Betrifft: AW: Bereich als Grafik speichern von: Jonathan
Geschrieben am: 10.07.2008 18:03:29

Hey,

das macht echt Spaß, hier Fragen zu stellen - vieln Dank für die Antwort und die super Idee!


 

Beiträge aus den Excel-Beispielen zum Thema "Bereich als Grafik speichern"