Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
460to464
460to464
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Special: Bild aus Excel als eigene Datei speichern

Forumthread: Special: Bild aus Excel als eigene Datei speichern

Special: Bild aus Excel als eigene Datei speichern
28.07.2004 15:02:49
Manasse
Hallo,
habe ein Problem ganz anderer Art.
Kennt jemand eine Möglichkeit, ein Bild, das in eine Exceltabelle einkopiert wurde, wieder als ein eigenständiges Bild im JPG oder BMP o.ä. Format zu speichern?
Für jeden Tipp bin ich sehr dankbar
Gruß
Manasse
Anzeige
AW: Special: Bild aus Excel als eigene Datei speichern
28.07.2004 15:10:21
EtoPHG
Bild über kopieren in ein Paint-Programm einfügen und von dort als Datei speichern
Hansueli
AW: Special: Bild aus Excel als eigene Datei speichern
Timo
Hallo Manasse,
ich habe mir dafür mal ein Makro geschrieben.
Du findest es anbei:

Sub Diagramm_exportieren()
On Error GoTo errorhandler
Dateiname = Application.GetSaveAsFilename(filefilter:="Jpg Files (*.jpg), *.jpg,Gif Files (*.gif), *.gif")
ActiveChart.Export Filename:=Dateiname
errorhandler:
End Sub

Du hast dabei die Auswahl das Diagramm als Gif oder als JPG abzuspeichern.
Ich hoffe ich konnte Dir damit weiterhelfen.
Gruß,
Timo
Anzeige
AW: Special: Bild aus Excel als eigene Datei speichern
Manasse
Hallo Timo,
vielen Dank für Dein Makro. Wenn ich es aufrufe kommt der Dialog speichern unter. Aber wenn ich dann abgespeichert habe, verschwindet die Datei im Nirvana. Sie liegt nicht in dem Ordner, in dem sie angeblich gespeichert wurde.
Benutze ich das Makro falsch oder gibt es da einen Trick?
Manasse
Anzeige
AW: Special: Bild aus Excel als eigene Datei speic
Karl
Es fehlt wohl die Angabe des Filters:

Sub ...
ActiveChart.Export Dateiname, Right$(Dateinname, 3)
End 


Sub
AW auf Karls Erweiterung (klappt nicht)
Manasse
Hallo Karl,
Danke für Deinen Hinweis. Habe die Zeile eingfügt so wie ich dachte, dass es richtig sei. Aber leider wird immernoch keine Datei gespeichert.
Vielleicht hast Du nochmal Nerv', Dich der Sache anzunehmen. Wenn nicht habe ich Pech gehabt. Trotzdem nochmals Danke für Deine Mühe.
Zur Sicherheit hier das Makro mit Deiner Erweiterung:
========================================

Sub Diagramm_exportieren()
On Error GoTo errorhandler
Dateiname = Application.GetSaveAsFilename(filefilter:="Jpg Files (*.jpg), *.jpg,Gif Files (*.gif), *.gif")
ActiveChart.Export Filename:=Dateiname
ActiveChart.Export Dateiname, Right$(Dateinname, 3)
errorhandler:
End Sub

=============================================
Es klappt auch nicht, wenn ich die Zeile "ActiveChart.Export Filename:=Dateiname" entfernt habe.
Manasse
Anzeige
AW: AW auf Karls Erweiterung (klappt nicht)
28.07.2004 17:31:48
Nepumuk
Hallo Manasse,
das kann auch nicht funktionieren, da sich das Bild noch nicht in einer Chartarea befindet. So sollte es funktionieren:


Sub Bild_erstellen()
    Dim myChart As Chart, myChartObject As ChartObject
    Dim int_with As Integer, int_hight As Integer
    Application.ScreenUpdating = False
    Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture
    int_with = Selection.Width - Selection.Width / 100 * 8
    int_hight = Selection.Height - Selection.Height / 100 * 8
    Set myChart = Charts.Add
    Set myChartObject = ActiveChart.ChartObjects.Add(0, 0, int_with, int_hight)
    With myChartObject.Chart
        .Paste
        .Export Filename:=ActiveWorkbook.Path & "\zwischenablage.jpg", FilterName:="JPG", Interactive:=False
    End With
    Application.DisplayAlerts = False
    myChart.Delete
    Application.DisplayAlerts = True
    Set myChart = Nothing
    Set myChartObject = Nothing
    Application.ScreenUpdating = True
End Sub


Einfach das Bild mit einem Mausklick kopieren und das Programm starten.
Gruß
Nepumuk
Anzeige
AW: Special: Bild aus Excel als eigene Datei speichern
Manasse
Hi Hansueli,
ganz herzlichen Dank!! Einfache Lösung, klappt prima !!
Manasse
;

Forumthreads zu verwandten Themen

Bilddatei mit neuem Namen speichern
egonkernien

Hallo wer hilft bitte?
Guten Abend.
Ich möchte eine Dialogbox aufrufen, dort eine Bilddatei auswählen.
Ich möchte diese Bilddatei in ein Image1 auf einer Userform laden. Z.B. D:\Daten\Bilder\DSC0011.jpg
Dann diese Bilddatei umbenennen in D:\Daten\Test\082008_01.jpg, abspeichern...
28.08.2008 22:32:28
Thread-ID: 1005608
5 Beiträge
Excel-Sheet als text-Datei speichern
Florian

Hallo!
Ich habe nur eun kleines Problem:
Ich lasse per Makro ein Excel-Blatt als TXT-Datei abspeichern!
Das ist der Code hierfür:
Sub DB_Kündigung_erstellen() Sheets("Kündigung").Select Rows("1:2").Select Selection.Copy Workbooks.Add ActiveSheet.Paste Application.DisplayAlert...
05.09.2008 09:57:00
Thread-ID: 1007593
5 Beiträge
Tabelle als PDF speichern
PeTeR

Hallo VBA-Freaks,
ich suche seit Stunden - finde aber nicht den exakt passenden Code, obwohl es zig Einträge zu dem Thema gibt.
Ich will eine Tabelle per VBA in PDF umwandeln u. drucken. Mein Code:
Application.ActivePrinter = "Adobe PDF auf Ne01:"
ActiveWindow.SelectedSheets.Pri...
25.10.2008 23:06:00
Thread-ID: 1019291
5 Beiträge
Export von Excel Diagrammen als JPG
Excel

Hi zusammen!
Ich habe ein Prblem mit einem (bzw. mehreren) Excel-Diagrammen:
Ich habe eine Datebank mit einer Vielzahl von Datensätzen. Ich wähle in einem anderen Tabellenblatt per Dropdown-Feld je einen Datensatz aus und aus den per sverweis hierher gezogenen Werten aus der Datenbank w...
12.11.2008 11:27:00
Thread-ID: 1023758
6 Beiträge
Bereich von Tabelle1 als Grafik in Tabelle2 einfüg
Tabelle1

Hallo Leute,
ich komm irgendwie nicht weiter und benötige Hilfe.
es soll z.B. von Sheets("Tabelle1") Range("a1:b5")
als Grafik
in Sheets("Tabelle2")
Gruss
Atikar
19.11.2008 17:09:19
Thread-ID: 1026118
3 Beiträge
Anzeige
Bereich als Bild in bestimmter Größeexportieren
dirkraeder

Hallo Excelgemeinde!!
Ich habe ein Problem und benötige eure Hilfe!
Ich habe mir eine Excel Datei gebastelt. In dieser Datei habe ich ein Formular, dass sich durch Auswahl in einem Kombinationsfeld verändert.
Nun muss ich die Ansicht dieses Formulars als GIF-Bilddatei immer wieder m...
26.11.2008 11:08:00
Thread-ID: 1027962
3 Beiträge
als Bild kopieren
Manu

Hallo
die in Excel erstellten Grafiken übernehme ich als Bild in eine ppt. Bisher mache ich Screenshots, schneide unnötiges im Paint weg und speichere es als jpg ab um es als Grafik wieder in ppt zu importieren. Ich bin an Neuem interessiert und bin des jetztigen, m.E. sehr langen und aufwe...
16.12.2008 08:36:00
Thread-ID: 1033184
2 Beiträge
Anzeige
screenshot als JPG speichern
heike

Hallo experten,
ich suche eine VBA - Lösung um einen Screenshot zu erzeugen und diesen als JPG abzuspeichern.
Eine Lösung, um eine BMPdatei zu speicher habe ich bereits (sieh unten).
Danke Nepumuk.
Am besten währe genau dieser Ansatz, weil ich das Bild beschneiden kann.
Nur...
16.12.2008 20:47:09
Thread-ID: 1033426
2 Beiträge
Tabellenblätter einzeln als Datei speichern
murat

Hallo,
ich habe einen tollen VBA Code hier im Forum gefunden!
Ich möchte die einzeln Tabellenblätter als Datei Speichern. ich habe 20 Tabellenblätter in einer Datei aus der sollen 20 Dateien werden. Dateiname steht immer in Zelle C2 des jeweiligen tabellenblattes.
Der Code unten i...
13.01.2009 11:46:16
Thread-ID: 1039178
3 Beiträge
Anzeige
Diagramm als .PNG abspeichern
Grabner

Hallo!
Es geht um folgendes Thema, dass ich vor einiger Zeit mal gestellt hatte:
https://www.herber.de/forum/archiv/1040to1044/t1040069.htm
Das Problem ist, dass es immer nur das erste Diagramm des aktiven Excel-Registers exportiert. Jetzt habe ich mal testweise ActiveSheet.ChartObj...
30.01.2009 12:33:19
Thread-ID: 1045360
4 Beiträge
Alle Dateien als Excel97 speichern
WolfgangN

Hallo,
ich habe Excel2003 und möchte alle Excel-Tabellen aus einem Ordner (Excel-Tabellen) in einem anderen Ordner (PCShop) als Excel 97 Version speichern, um sie zu brennen und zu einem PC zu nehmen, wo nur Excel 97 installiert ist.
An den Dateien wird nichts geändert, soll nur als Exc...
12.02.2009 19:17:00
Thread-ID: 1050222
3 Beiträge
Pivot Tabelle in Array auslesen & neu erstellen
Andreas

Hallo Herber Fans,
da PivotTabellen sich nicht immer rational verhalten, ist es zuweilen notwendig, diese zu löschen und komplett neu aufzubauen, damit sie wieder fehlerlos sind und andere VBA Codes die mit ihnen arbeiten, nicht zum Absturz bringen.
Was ich nun realisierte, war ein Code...
12.02.2009 19:20:00
Thread-ID: 1050227
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Bild aus Excel speichern: Schritt-für-Schritt-Anleitung

Schritt-für-Schritt-Anleitung

Um ein Bild aus Excel zu speichern, kannst Du folgende Schritte befolgen:

  1. Bild auswählen: Klicke auf das Bild in Deiner Excel-Tabelle, das Du speichern möchtest.
  2. Kopieren: Drücke Strg + C, um das Bild in die Zwischenablage zu kopieren.
  3. Paint öffnen: Starte das Paint-Programm auf Deinem Computer.
  4. Einfügen: Drücke Strg + V, um das Bild in Paint einzufügen.
  5. Speichern: Gehe auf Datei > Speichern unter. Wähle das gewünschte Format (z.B. JPG oder PNG) und speichere die Datei an einem gewünschten Ort.

Alternativ kannst Du auch ein Makro verwenden, um das Bild direkt in einer Datei zu speichern.

Häufige Fehler und Lösungen

  • Fehler: Bild wird nicht gespeichert.

    • Lösung: Stelle sicher, dass Du das Bild korrekt in die Zwischenablage kopiert hast. Manchmal kann es helfen, Excel neu zu starten.

  • Fehler: Makro funktioniert nicht.

    • Lösung: Überprüfe den Code. Achte darauf, dass der Dateiname und der Filter korrekt sind. Hier ist ein Beispiel für ein effektives Makro:
    Sub Bild_erstellen()
    Dim myChart As Chart, myChartObject As ChartObject
    Dim int_with As Integer, int_hight As Integer
    Application.ScreenUpdating = False
    Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture
    int_with = Selection.Width - Selection.Width / 100 * 8
    int_hight = Selection.Height - Selection.Height / 100 * 8
    Set myChart = Charts.Add
    Set myChartObject = ActiveChart.ChartObjects.Add(0, 0, int_with, int_hight)
    With myChartObject.Chart
        .Paste
        .Export Filename:=ActiveWorkbook.Path & "\zwischenablage.jpg", FilterName:="JPG", Interactive:=False
    End With
    myChart.Delete
    Application.ScreenUpdating = True
End Sub

Alternative Methoden

Zusätzlich zur oben beschriebenen Methode gibt es verschiedene Alternativen, um Bilder aus Excel zu speichern:

  1. Excel als Bild exportieren: Du kannst die gesamte Excel-Tabelle oder einen bestimmten Bereich als Bild exportieren. Gehe dazu auf Datei > Exportieren > Als Bild speichern.

  2. Diagramme speichern: Wenn es sich um ein Diagramm handelt, kannst Du es direkt als Bild speichern, indem Du mit der rechten Maustaste darauf klickst und Diagramm als Bild speichern auswählst.

Praktische Beispiele

  • Beispiel 1: Um eine Excel-Tabelle als JPG zu speichern, wähle den gewünschten Bereich aus, gehe auf Datei > Exportieren und wähle Als Bild speichern.

  • Beispiel 2: Verwende das Makro, um ein Bild aus der Zwischenablage als Datei zu speichern. Du kannst das Makro anpassen, um verschiedene Bildformate wie PNG oder GIF zu speichern.

Tipps für Profis

  • Verwendung von Shortcuts: Lerne die Tastenkombinationen für das Kopieren und Einfügen, um den Prozess zu beschleunigen.
  • Automatisierung durch Makros: Erstelle eigene Makros, um häufige Aufgaben zu automatisieren und Zeit zu sparen.
  • Qualität erhöhen: Achte darauf, dass die Auflösung des Bildes beim Speichern hoch genug ist, um eine gute Qualität zu gewährleisten.

FAQ: Häufige Fragen

1. Wie speichere ich ein Bild aus Excel als JPG? Um ein Bild aus Excel als JPG zu speichern, kopiere es in die Zwischenablage, öffne Paint, füge es ein und speichere es dann im JPG-Format.

2. Gibt es eine Möglichkeit, mehrere Bilder aus Excel gleichzeitig zu speichern? Ja, Du kannst ein Makro schreiben, das alle Bilder in einem bestimmten Bereich oder auf einem Arbeitsblatt durchläuft und sie nacheinander in eine Datei speichert.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige