3 Schnelle Möglichkeiten zum Kopieren aller Bilder aus einem Word-Dokument in eine Outlook-E-Mail

Wenn Sie alle Bilder aus einem Word-Dokument in eine Outlook-E-Mail kopieren möchten, können Sie die drei in diesem Artikel vorgestellten Ansätze verwenden.

Sie beenden beispielsweise ein Word-Dokument, das mehrere Bilder enthält. Später möchten Sie diese Bilder im Dokument wiederverwenden, um eine Outlook-E-Mail zu erstellen. In dieser Situation sehnen Sie sich nach einer schnellen Lösung, um die Bilder aus dem Word-Dokument schnell in eine E-Mail in Outlook zu kopieren. Wenn Sie sich diese Anforderung ansehen, werden wir Ihnen hier drei Möglichkeiten zeigen, wie Sie sie erreichen können.

Methode 1: Nacheinander kopieren

1. Erstellen Sie zunächst in Outlook eine neue E-Mail.
2. Öffnen Sie dann das Word-Quelldokument.
3. Wählen Sie als Nächstes ein Bild im Word-Dokument aus.
4. Drücken Sie "Strg + C", um es zu kopieren.
5. Danach Zugriff auf die Outlook-E-Mail.
6. Zuletzt drücken Sie im Nachrichtentext „Strg + V“, um das kopierte Bild einzufügen.
7. Verwenden Sie nun diese Methode, um die anderen Bilder aus dem Dokument einzeln in diese E-Mail zu kopieren.

Methode 2: Bilder speichern und Stapel in E-Mail einfügen

1. Gehen Sie im geöffneten Word-Dokument zunächst zu "Datei"> "Speichern unter".
2. Wählen Sie dann im Popup-Dialogfeld einen Zielordner aus und wählen Sie im Feld "Dateityp" die Option "Webseite".
3. Klicken Sie anschließend auf die Schaltfläche "Speichern".
4. Schließen Sie danach die Word-Anwendung wie gewohnt.
5. Erstellen Sie anschließend eine neue Outlook-E-Mail.
6. Wechseln Sie im Nachrichtenfenster zur Registerkarte "Einfügen" und klicken Sie auf die Schaltfläche "Bild".
7. Wechseln Sie später im neuen Dialogfeld zum Speicherort des Word-Dokuments als Webseite.
8. Öffnen Sie dann den Ordner "xxx_files".
9. Wählen Sie als Nächstes die Bilder aus, die Sie einfügen möchten.
10. Klicken Sie abschließend auf die Schaltfläche "Einfügen".
11. Sie können sehen, dass die ausgewählten Bilder in die E-Mail eingefügt wurden.

Methode 3: Stapelkopie über VBA

1. Öffnen Sie zunächst das Word-Dokument.
2. Drücken Sie dann „Alt + F11“, um auf den Word VBA-Editor zuzugreifen.
3. Kopieren Sie anschließend den folgenden VBA-Code in ein Modul.

Sub CopyImagesToMail()
    Dim objTempDocument As Word.Document
    Dim objInlineShape As Word.InlineShape
    Dim objShape As Word.Shape
    Dim objOutlookApp As Object
    Dim objMail As Object
    Dim objMailDocument As Word.Document
    Dim objDocSelection As Word.Selection
 
    'Copy the whole document to a new Temp document
    Selection.WholeStory
    Selection.Copy
 
    Set objTempDocument = Word.Documents.Add
    objTempDocument.Application.Selection.PasteAndFormat (wdUseDestinationStylesRecovery)

    For Each objInlineShape In objTempDocument.InlineShapes
        objInlineShape.ConvertToShape
    Next
 
    'Clear text in the Temp document
    With objTempDocument.Content.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Text = "[^2-^255]{1,}"
        .Replacement.Text = ""
        .MatchWildcards = True
        .Execute Replace:=wdReplaceAll
    End With
 
    Do While objTempDocument.Shapes.Count > 0
       For Each objShape In objTempDocument.Shapes
           objShape.ConvertToInlineShape
       Next
    Loop
 
    'Copy the images in Temp Document
    objTempDocument.Application.Selection.WholeStory
    objTempDocument.Application.Selection.Copy
 
    On Error Resume Next
    Set objOutlookApp = GetObject(, "Outlook.Application")
    If objOutlookApp Is Nothing Then
       Set objOutlookApp = CreateObject("Outlook.Application")
    End If
 
    'Create a new Outlook email
    Set objMail = objOutlookApp.CreateItem(olMailItem)
    objMail.Display
    Set objMailDocument = objMail.GetInspector.WordEditor
    Set objDocSelection = objMailDocument.Application.Selection
 
    'Paste the copied images into email
    objDocSelection.Collapse Direction:=wdCollapseStart
    objDocSelection.PasteAndFormat (wdUseDestinationStylesRecovery)
 
    objTempDocument.Close False
End Sub

4. Drücken Sie danach die Taste „F5“, um dieses Makro auszuführen.
5. Wenn das Makro fertig ist, erhalten Sie eine neue Outlook-E-Mail mit allen Bildern des Word-Dokuments, wie im folgenden Screenshot dargestellt:

Kümmern Sie sich sorgfältig um Ihren Ausblick

Jeder normale Benutzer hatte möglicherweise verschiedene Probleme in Outlook. Um ehrlich zu sein, wenn Sie sich um Ihren Outlook kümmern, können Sie schreckliche Probleme effektiv vermeiden. Beispielsweise müssen Sie Outlook wahrscheinlich immer schließen und unbekannten E-Mails nicht ohne weiteres vertrauen. Es ist auch ratsam, sich ein qualifiziertes PST-Fix-Tool wie z DataNumen Outlook Repair. Es kann reparieren korrupte PST Probleme wie ein Korken.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich MDF-Wiederherstellung und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX