Thema Datum  Von Nutzer Rating
Antwort
Rot Tabelle als jpg in selben Ordner wie Original Datei speichern
 25.01.2026 15:32:36 Bernhard
NotSolved
26.01.2026 06:33:18 Gast87491
NotSolved

Ansicht des Beitrags:
Von:
Bernhard		 Datum:
25.01.2026 15:32:36		 Views:
47		 Rating:
     
Antwort:
  Ja
Thema:
Tabelle als jpg in selben Ordner wie Original Datei speichern		 
Guten Tag, an allle,

bin ein kompletter VBA NOOB - habs aber geschafft mir ein kleines script zusammenzugoogeln dass einen Bereich meiner Tabelle als .jpg exportiert und am Computer speichert. 

Allerdings schaffe ich es nocht dass es im selben Ordner wie die Originaldatei gespeichert wird (Datei wird von mehreren Personen verwendet/Speicherort ändert sich je nach anwender).

Kann mir Bitte jemand Helfen?

Perfekt wäre es wenn es auf Windows & Mac funktionieren würde - Wichtig wäre es für Windows...

Danke im voraus!

 


Sub SaveRangeAsJPG()
    Set ws = ActiveSheet
    
    ' Bereich festlegen, der als Bild gespeichert werden soll
    Set rng = ws.Range("A1:I20")
    
    ' Speicherpfad definieren
    filepath = Application.ActiveWorkbook.path

    ' Bereich als Bild kopieren
    rng.CopyPicture Appearance:=xlScreen, Format:=xlPicture

    ' Temporäres Diagramm erstellen
    Set cht = ws.ChartObjects.Add(8000, 4000, rng.Width, rng.Height)

    ' Bild in Diagramm einfügen und exportieren
    With cht
        .Chart.Paste
        .Chart.Export fileName:="tab.jpg"
        .Delete ' Temporäres Diagramm löschen
    End With

End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Tabelle als jpg in selben Ordner wie Original Datei speichern
 25.01.2026 15:32:36 Bernhard
NotSolved
26.01.2026 06:33:18 Gast87491
NotSolved