3 snelle manieren om alle afbeeldingen van een Word-document naar een Outlook-e-mail te kopiëren

Als u alle afbeeldingen van een Word-document naar een Outlook-e-mail wilt kopiëren, kunt u de 3 benaderingen gebruiken die in dit artikel zijn geïntroduceerd.

U maakt bijvoorbeeld een Word-document af dat meerdere afbeeldingen bevat. U wilt deze afbeeldingen later opnieuw gebruiken in het document om een ​​Outlook-e-mail samen te stellen. In deze situatie verlang je naar een snelle oplossing om snel de afbeeldingen uit het word-document naar een e-mail in Outlook te kopiëren. Als we naar deze vereiste kijken, leren we je hier 3 manieren om het te krijgen.

Kopieer alle afbeeldingen van een Word-document naar een Outlook-e-mail

Methode 1: één voor één kopiëren

  1. Maak eerst in Outlook een nieuwe e-mail aan.
  2. Open vervolgens het bron-Word-document.
  3. Selecteer vervolgens een afbeelding in het Word-document.
  4. Druk op "Ctrl + C" om het te kopiëren.Kopieer een afbeelding in document
  5. Daarna toegang tot de Outlook-e-mail.
  6. Druk ten slotte op "Ctrl + V" in de berichttekst om de gekopieerde afbeelding te plakken.Plak de afbeelding in e-mail
  7. Gebruik nu deze manier om de andere afbeeldingen van het document één voor één naar deze e-mail te kopiëren.

Methode 2: afbeeldingen opslaan en in batch invoegen in e-mail

  1. Ga eerst in het geopende Word-document naar "Bestand"> "Opslaan als".Opslaan als
  2. Kies vervolgens in het pop-upvenster een bestemmingsmap en selecteer "Webpagina" in het veld "Opslaan als type".
  3. Klik vervolgens op de knop "Opslaan".Document opslaan als webpagina
  4. Sluit daarna de Word-toepassing zoals normaal.
  5. Maak vervolgens een nieuwe Outlook-e-mail aan.
  6. Ga in het berichtvenster naar het tabblad "Invoegen" en klik op de knop "Afbeelding".
  7. Ga later in het nieuwe dialoogvenster naar de locatie voor het opslaan van het Word-document als webpagina.
  8. Open vervolgens de map met de naam "xxx_files".
  9. Selecteer vervolgens de afbeeldingen die u wilt invoegen.
  10. Klik ten slotte op de knop "Invoegen".Afbeeldingen invoegen in e-mail
  11. U kunt zien dat de geselecteerde afbeeldingen in de e-mail zijn ingevoegd.Afbeeldingen ingevoegd in e-mail

Methode 3: Batch kopiëren via VBA

  1. Open eerst het Word-document.
  2. Druk vervolgens op "Alt + F11" om toegang te krijgen tot de Word VBA-editor.
  3. Kopieer vervolgens de onderstaande VBA-code naar een module.
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

Zet VBA-code in Word VBA Editor

  1. Druk daarna op de toets "F5" om deze macro uit te voeren.
  2. Wanneer de macro is voltooid, ontvangt u een nieuwe Outlook-e-mail met alle afbeeldingen van het Word-document, zoals de volgende schermafbeelding:Kopieer afbeeldingen van document naar e-mail

Zorg goed voor uw Outlook

Elke gewone gebruiker kan te maken hebben gehad met verschillende problemen in Outlook. Om eerlijk te zijn, als u voor uw Outlook zorgt, kunt u vreselijke problemen effectief voorkomen. U moet bijvoorbeeld uw Outlook waarschijnlijk altijd sluiten en onbekende e-mails niet snel vertrouwen. Het is ook verstandig om een ​​gekwalificeerde PST-fix-tool te bemachtigen, zoals DataNumen Outlook Repair​ Het kan repareren corrupte PST problemen als een kurk.

Auteur Introductie:

Shirley Zhang is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder mdf herstel en Outlook-reparatiesoftwareproducten. Voor meer informatie bezoek www.datanumen.com

Reacties zijn gesloten.