2 snabba sätt att kopiera alla bilder från ett Excel-kalkylblad till ett Outlook-e-postmeddelande

Outlook-lösningar September 29, 2025

Ibland kan du behöva kopiera alla inbäddade bilder i ett Excel-kalkylblad till ett Outlook-e-postmeddelande. Just nu kan du läsa den här artikeln. Här kommer vi att presentera dig 2 snabba metoder.

Det är lätt att kopiera en bild från ett Excel-kalkylblad till ett Outlook-e-postmeddelande. Du kan bara välja och trycka på "Ctrl + C" för att kopiera den här bilden. Men om det finns många bilder som ska kopieras är kopiering en efter en utan tvekan ett dumt och tråkigt sätt. Därför kommer vi här att presentera dig två mycket mer effektiva sätt. Läs nu vidare för att få dem i detalj.

Metod 1: Välj och kopiera alla bilder i Excel-kalkylblad manuellt

  1. Till att börja med, öppna det specifika Excel-arket.
  2. Tryck sedan på knappen “F5”.
  3. Klicka på knappen "Special" i popup-dialogrutan "Gå till".Klicka på knappen "Special".
  4. Välj sedan "Objekt" i den nya dialogrutan "Gå till special" och klicka på "OK".Välj "Objekt"
  5. På en gång har alla inbäddade bilder valts.
  6. Tryck nu på "Ctrl + C" för att kopiera alla valda bilder.Kopiera alla markerade objekt
  7. Efter det, starta Outlook och skapa ett nytt e-postmeddelande.
  8. Senare placerar du markören i meddelandetexten och trycker på "Ctrl + V".
  9. Omedelbart kommer alla kopierade bilder att klistras in i e-postmeddelandet, som följande bild.Klistra in kopierade bilder

Metod 2: Kopiera alla bilder från kalkylblad till e-post med VBA

  1. Till att börja med, i Excel, tryck på "Alt + F11" för att starta Excel VBA-editorn.
  2. Lägg sedan in VBA-koden nedan i en modul eller ett projekt.
Sub CopyImagesToMail()
    Dim objWorksheet As Excel.Worksheet
    Dim objOutlookApp As Object
    Dim objMail As Object
    Dim objMailDocument As Object
    Dim objShape As Excel.Shape
 
    'Get the specific worksheet
    Set objWorksheet = ThisWorkbook.Worksheets(1)
 
    'Create a new email
    Set objOutlookApp = CreateObject("Outlook.application")
    Set objMail = objOutlookApp.CreateItem(objOutlookAppobjMailItem)
    objMail.Display
    Set objMailDocument = objMail.GetInspector.WordEditor
 
    'Copy images to the email
    For Each objShape In objWorksheet.Shapes
        objShape.Copy
        objMailDocument.Range(0, 0).Paste
    Next
End Sub

VBA-kod - Kopiera alla bilder från ett Excel-kalkylblad till ett Outlook-e-postmeddelande

  1. Tryck sedan på "F5" i det aktuella makrot.
  2. Omedelbart kommer ett nytt e-postmeddelande att visas.
  3. Här kan du få en varning där du ska klicka på "Tillåt".Tillåt åtkomst
  4. Så småningom kommer alla bilder i det specifika Excel-kalkylbladet att finnas i e-postmeddelandet, som visas i följande skärmdump.Kopierade bilder i e-posttexten

Håll utkik efter alla risker kring Outlook

Outlook är känsligt för korruption genom att det finns för många hot runt det, som virus, systemfel, maskinvarufel och strömproblem och så vidare. Därför är det nödvändigt för dig att se upp för alla dessa farliga faktorer. Först och främst bör du aldrig lätt lita på e-postmeddelanden från okända avsändare. Dessutom är det bättre att du fortsätter säkerhetskopiera din Outlook-fil med jämna mellanrum. Sist men inte minst, för att fixa PST fil i tid, bör du förbereda ett banbrytande reparationsverktyg, som DataNumen Outlook Repair.

Författarintroduktion:

Shirley Zhang är expert på dataåterställning DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive korrupt sql och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com

Kommentarer är stängda.