2 hurtige måder at kopiere alle billeder fra et Excel-regneark til en Outlook-e-mail

Outlook-løsninger September 29, 2025

Nogle gange kan det være nødvendigt at kopiere alle indlejrede billeder i et Excel-regneark til en Outlook-e-mail. På dette tidspunkt kan du læse denne artikel. Her introducerer vi dig to hurtige metoder.

Det er let at kopiere et billede fra et Excel-regneark til en Outlook-e-mail. Du kan bare vælge og trykke på "Ctrl + C" for at kopiere dette billede. Men hvis der er mange billeder, der skal kopieres, er det uden tvivl en dum og kedelig måde at kopiere en efter en. Derfor introducerer vi dig her 2 meget mere effektive måder. Læs nu for at få dem i detaljer.

Metode 1: Vælg & kopier alle billeder i Excel-regneark manuelt

  1. Til at starte med skal du åbne det specifikke Excel-regneark.
  2. Tryk derefter på “F5” -tasten.
  3. Klik på knappen "Special" i popup-dialogboksen "Gå til".Klik på knappen "Special"
  4. Vælg derefter "Objekter" i den nye dialogboksen "Gå til speciel" og klik på "OK".Vælg "Objekter"
  5. På én gang er alle de indlejrede billeder valgt.
  6. Tryk nu på "Ctrl + C" for at kopiere alle de valgte billeder.Kopier alle valgte objekter
  7. Derefter skal du starte Outlook og oprette en ny e-mail.
  8. Senere skal du placere markøren i meddelelsens brødtekst og trykke på "Ctrl + V".
  9. Straks bliver alle de kopierede billeder indsat i e-mail-kroppen, som den følgende figur.Indsæt kopierede billeder

Metode 2: Kopier alle billeder fra regneark til e-mail med VBA

  1. Til at starte med skal du i Excel trykke på "Alt + F11" for at aktivere Excel VBA-editoren.
  2. Sæt derefter VBA-koden nedenfor i et modul eller 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-kode - Kopier alle billeder fra et Excel-regneark til en Outlook-e-mail

  1. Tryk derefter på “F5” -tasten i den aktuelle makro.
  2. Straks vises en ny e-mail.
  3. Her kan du modtage en advarsel, hvor du skal klikke på "Tillad".Tillad adgang
  4. Til sidst vil alle billederne i det specifikke Excel-regneark være i e-mail-kroppen, som vist i det følgende skærmbillede.Kopierede billeder i e-mail-kroppen

Hold øje med alle risici omkring Outlook

Outlook er modtageligt for korruption, fordi der er for mange trusler omkring det, såsom virus, systemfejl, hardwarefejl og strømproblemer og så videre. Derfor er det nødvendigt for dig at holde øje med alle disse farlige faktorer. Først og fremmest bør du aldrig let stole på e-mails fra ukendte afsendere. Derudover skal du fortsat sikkerhedskopiere din Outlook-fil med jævne mellemrum. Sidst men ikke mindst, for at rette PST fil i tide, skal du forberede et banebrydende reparationsværktøj, ligesom DataNumen Outlook Repair.

Forfatter Introduktion:

Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder korrupt sql og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com

Kommentarer er lukket.