So speichern Sie alle Bilder aus einem Word-Dokument

Beim Arbeiten mit Word-Dokumenten, die zahlreiche Bilder enthalten, ist das manuelle Speichern jedes einzelnen Bildes oft zeitaufwendig und ineffizient. Zum Glück gibt es mehrere praktische Methoden, mit denen Sie alle eingebetteten Bilder schnell und auf einmal extrahieren können – für einen reibungslosen Ablauf und die Sicherheit, dass kein Bild übersehen wird. In diesem Tutorial stellen wir Ihnen vier effektive Lösungen vor, um sämtliche Bilder aus Ihrem Word-Dokument zu speichern; jede Methode ist dabei ideal auf unterschiedliche Anforderungen und Szenarien zugeschnitten.

Speichern Sie alle Bilder mithilfe der Funktion „Speichern unter“

Speichern Sie alle Bilder mit Kutools für Word

Speichern Sie alle Bilder durch Ändern der Dateierweiterung

Verwenden Sie VBA-Code, um automatisch alle Bilder zu extrahieren und zu speichern

---

Speichern Sie alle Bilder mithilfe der Funktion „Speichern unter“

Die Funktion Speichern unter bietet eine unkomplizierte Möglichkeit, alle Bilder auf einmal aus einem Word-Dokument zu extrahieren. Diese Methode ist besonders praktisch, wenn Sie auf Add-Ins oder komplizierte Einstellungen verzichten möchten. So geht’s:

1. Öffnen Sie zunächst das Dokument, das die gewünschten Bilder enthält. Navigieren Sie anschließend in der Word-Oberfläche zu Datei > Speichern unter.
2. Wählen Sie in der Dropdown-Liste Speichern im Format das Format Webseite (*.htm; *.html) aus. Bei diesem Format wird das Dokument so exportiert, dass Bilder und andere Medien in einen externen Ordner ausgegliedert werden.
3. Klicken Sie auf Speichern.

   

Nach dem Speichern werden eine .htm-Datei und ein entsprechender Ordner (benannt nach Ihrem Dokument) am von Ihnen angegebenen Speicherort erstellt. In diesem Ordner finden Sie alle aus dem Dokument extrahierten Bilder in ihren ursprünglichen Formaten. Diese Methode ist schnell und funktioniert bei den meisten Standard-Word-Dokumenten. Allerdings können die Bildnamen generisch sein, und in seltenen Fällen werden einige fortgeschrittene Bildtyp möglicherweise nicht perfekt extrahiert. Bei umfangreichen Dokumenten kann das Sortieren der Bilder zusätzlichen Aufwand erfordern.

---

Speichern Sie alle Bilder mit Kutools für Word

Kutools für Word bietet eine spezielle Funktion namens Bild/Tabelle als Bilder exportieren, mit der Sie alle Bilder Ihres Dokuments effizient und mit nur wenigen Klicks exportieren können. Diese Methode ist ideal für Anwender, die regelmäßig Dokumente mit zahlreichen Bildern bearbeiten oder Exportformat und Zielordner individuell anpassen möchten.

1. Klicken Sie auf dem Word-Menüband auf KUTOOLS PLUS>Mehr>Bild/Tabelle als Bilder exportieren.

   

2. Konfigurieren Sie im Dialogfeld Bild/Tabelle als Bilder exportierendie Extraktionsoptionen sorgfältig:
   • Legen Sie Typen auf Bilder fest, um nur Bilder in Ihren Export einzuschließen.
   • Wählen Sie Ihr bevorzugtes Bildformat (z. B. PNG, JPG oder BMP) aus der Exportformat-Dropdown-Liste aus. Die Wahl des passenden Formats stellt sicher, dass es für die zukünftige Verwendung kompatibel ist.
   • Klicken Sie auf die -Schaltfläche, um einen Ordner festzulegen, in dem alle Bilder gespeichert werden. Bestätigen Sie Ihre Auswahl, um zu verhindern, dass Bilder an einen unbeabsichtigten Speicherort exportiert werden.

     

3. Klicken Sie auf Exportieren. Alle Bilder aus dem Dokument werden extrahiert und als einzelne Dateien in Ihrem gewählten Ordner gespeichert.

Diese Lösung ermöglicht die Stapelverarbeitung von Bildern, unterstützt flexible Formatierung und bietet zusätzliche Vorteile bei der Handhabung von Tabellen oder speziellen Grafiken. Enthält Ihr Dokument komplexe Layouts oder eine Mischung verschiedener Bildtypen, vereinfacht Kutools den gesamten Prozess. Stellen Sie sicher, dass der Zielordner über Schreibrechte verfügt, um Fehler während des Exports zu vermeiden.

---

Speichern Sie alle Bilder durch Ändern der Dateierweiterung

Wenn Sie auf zusätzliche Software oder integrierte Funktionen verzichten möchten, können Sie alle Bilder manuell extrahieren, indem Sie den Dateityp des Word-Dokuments ändern. Diese Methode nutzt die Tatsache, dass .docx-Dateien im Grunde ZIP-Archive sind, die sämtliche Dokumentressourcen enthalten. Obwohl sie etwas technisch ist, ermöglicht sie den direkten Zugriff auf die originalen Bilddateien. Gehen Sie wie folgt vor:

1. Klicken Sie mit der rechten Maustaste auf Ihre Word-Datei und wählen Sie Umbenennen.

   

2. Ändern Sie die Dateierweiterung, indem Sie .docx durch .zip ersetzen. Stellen Sie sicher, dass Dateierweiterungen im Windows-Explorer sichtbar sind.

   

3. Drücken Sie Enter. Falls eine Warnmeldung zum Ändern des Dateityps angezeigt wird, klicken Sie auf Ja, um fortzufahren.

   

4. Klicken Sie mit der rechten Maustaste auf das ZIP-Archiv und wählen Sie Extrahieren nach [Dateiname] aus, oder verwenden Sie ein beliebiges kompatibles Entpacktool.
5. Navigieren Sie innerhalb der entpackten Ordner zu Word > Media. Dieses Verzeichnis enthält sämtliche im ursprünglichen Dokument eingebetteten Bilder.

   

Diese Methode ermöglicht direkten Zugriff auf die Bilder in ihrer ursprünglichen Komprimierung und Qualität – ideal für fortgeschrittene Anwender oder Massenextraktionen. Achten Sie darauf, keine Dateien im entpackten Ordner zu verändern, da dies die Wiederherstellung des Dokuments beeinträchtigen könnte. Sollte Ihr System standardmäßig keine Dateierweiterungen anzeigen, aktivieren Sie diese in den Einstellungen des Windows-Explorers für diesen Vorgang.

---

Verwenden Sie VBA-Code, um automatisch alle eingebetteten Bilder zu extrahieren und zu speichern

Ein VBA-Makro bietet eine automatisierte Lösung, um alle eingebetteten Bilder aus Ihrem aktiven Word-Dokument zu extrahieren und in einen festgelegten Ordner zu exportieren. Das ist besonders vorteilhaft für Anwender, die regelmäßig Dokumente mit zahlreichen Bildern bearbeiten und einen automatisierten, wiederholbaren Prozess bevorzugen. Der VBA-Ansatz ist flexibel: Sie können das Exportziel anpassen und die Extraktion mit minimalem Benutzereingriff durchführen.

Diese Methode eignet sich ideal für Benutzer, die mit grundlegenden Makrooperationen in Word vertraut sind. Stellen Sie vor dem Start sicher, dass Makros aktiviert sind und Sie über die nötige Berechtigung verfügen, um VBA auf Ihrem Gerät auszuführen. Beachten Sie: Diese Lösung verarbeitet sowohl Inline- als auch schwebende Bilder, extrahiert jedoch unter Umständen keine Formen oder Diagramme als Bilder.

1. Öffnen Sie das Word-Dokument mit den Bildern, die Sie extrahieren möchten. Stellen Sie sicher, dass das Dokument aktiv und sichtbar ist.

2. Drücken Sie die Tastenkombination Alt+F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

3. Klicken Sie im VBA-Fenster auf Einfügen > Modul. Kopieren Sie anschließend den folgenden VBA-Code, und fügen Sie ihn in das Modulfenster ein:

VBA-Code: Extrahieren und Speichern aller eingebetteten Bilder aus dem aktiven Dokument

Sub ExportImagesPreserveOriginal()
'Updated by Extendoffice.com
    Dim doc As Document
    Dim tempPath As String
    Dim exportFolder As String
    Dim fso As Object
    Dim htmlPath As String
    Dim imgFolder As String
    Dim file As Object
    Dim subFolder As Object
    Dim xTitleId As String
    Dim foundImages As Boolean
    
    On Error Resume Next
    xTitleId = "Kutools for Word"

    ' Ask user for destination folder
    exportFolder = InputBox("Enter the full folder path to save images:", xTitleId, "C:\ExtractedImages")
    If exportFolder = "" Then Exit Sub
    If Right(exportFolder, 1) <> "\" Then exportFolder = exportFolder & "\"

    Set fso = CreateObject("Scripting.FileSystemObject")
    If Not fso.FolderExists(exportFolder) Then fso.CreateFolder exportFolder

    ' Save current document as filtered HTML (temporary)
    Set doc = ActiveDocument
    tempPath = Environ("TEMP") & "\WordImageExport_"
    htmlPath = tempPath & Format(Now, "yyyymmdd_hhnnss") & ".htm"
    
    doc.SaveAs2 FileName:=htmlPath, FileFormat:=wdFormatFilteredHTML

    ' Find the generated "_files" folder that contains the images
    imgFolder = Left(htmlPath, Len(htmlPath) - 4) & "_files"
    
    foundImages = False
    If fso.FolderExists(imgFolder) Then
        For Each file In fso.GetFolder(imgFolder).Files
            If LCase(Right(file.Name, 4)) = ".jpg" Or _
               LCase(Right(file.Name, 4)) = ".png" Or _
               LCase(Right(file.Name, 4)) = ".gif" Or _
               LCase(Right(file.Name, 4)) = ".bmp" Then
                fso.CopyFile file.Path, exportFolder & file.Name, True
                foundImages = True
            End If
        Next file
    Else
        For Each subFolder In fso.GetFolder(fso.GetParentFolderName(htmlPath)).SubFolders
            If InStr(1, subFolder.Name, "_files", vbTextCompare) > 0 Then
                For Each file In subFolder.Files
                    fso.CopyFile file.Path, exportFolder & file.Name, True
                    foundImages = True
                Next file
            End If
        Next subFolder
    End If

    On Error Resume Next
    fso.DeleteFile htmlPath, True
    fso.DeleteFolder imgFolder, True

    If foundImages Then
        MsgBox "All images have been exported successfully to:" & vbCrLf & exportFolder, vbInformation, xTitleId
    Else
        MsgBox "No images found in the document.", vbExclamation, xTitleId
    End If
End Sub

4. Drücken Sie die Taste F5, um das Makro auszuführen. Geben Sie bei der Aufforderung den Zielordner an (z. B.)C:\ExtractedImages), in dem alle Bilder gespeichert werden sollen.

Dieses Makro verarbeitet sämtliche Inline- und schwebenden Bilder aus dem aktiven Word-Dokument und speichert jedes Bild in einer generierten Datei in Ihrem gewählten Ordner. Stellen Sie sicher, dass der Ordner existiert und Sie über Schreibrechte verfügen. Die Bilder werden dabei in ihrem ursprünglichen Dateiformat gespeichert. Sollten Fehler auftreten, prüfen Sie den Dateipfad sowie die Makrosicherheitseinstellungen.

Dieser VBA-Ansatz eignet sich hervorragend für repetitive Aufgaben und große Bildmengen. Allerdings können andere Grafiktypen wie SmartArt oder Formeln unter Umständen nicht extrahiert werden. Nutzern, die mit VBA nicht vertraut sind, empfehlen wir dringend, vor dem Start die Sicherheitseinstellungen für Makros sowie bewährte Backup-Praktiken zu überprüfen.

---