6 måter å beholde de originale e-postvedleggene når du svarer i Outlook

Outlook-løsninger September 29, 2025

Mange brukere håper å konfigurere Outlook til å beholde de originale e-postvedleggene når de svarer på en e-post. Denne artikkelen vil avsløre 5 løsninger samt en smart måte, som bruker VBA for å realisere det automatisk.

Jeg har hørt et stort antall brukere som klager over at Outlook ikke har noen innebygd funksjon for å beholde originale vedlegg når de svarer på en e-post. Derfor vil vi her dele deg 6 metoder, hvorav den ene er ganske nyttig ettersom den bruker VBA for å få Outlook til å automatisk legge ved de originale vedleggene til å svare på e-post. Les nå videre for å få dem i detalj.

Behold de originale e-postvedleggene når du svarer i Outlook

1. Svar med original e-post vedlagt

Selv om Outlook ikke har en funksjon for å beholde originale e-postvedlegg når de svarer på en e-post, tillater det brukere å beholde original e-post vedlagt. Derfor er det en valgfri løsning for deg. Du kan gå til «Fil» > «Alternativer» > «E-post» > «Svar og videresende»-delen for å endre svarinnstillingene. For flere detaljer, foreslås det at du refererer til min forrige artikkel - "5 trinn for å svare med originale vedlegg i Outlook". Men hvis du fortsatt håper å beholde originale vedlegg, fortsett for å lære de andre måtene.

2. Dra og slipp vedlegg manuelt

  1. Til å begynne med, dobbeltklikk på en slik kilde-e-post for å åpne den i et eget vindu.
  2. Klikk deretter på "Svar"-knappen, som vil få opp svar-e-posten.
  3. Deretter bør du krympe begge de to meldingsvinduene til du kan se dem på samme skjerm.
  4. Deretter velger du alle vedleggene i den opprinnelige e-posten.
  5. Til slutt, dra og slipp dem til "Vedlagt"-linjen i svar-e-posten.Dra og slipp vedlegg manuelt

3. Kopier og lim inn vedlegg manuelt

  1. For det første, etter å ha åpnet kilde-e-posten, velg alle vedleggene.
  2. Klikk deretter på "Kopier"-knappen under fanen "Vedlegg".Kopier alle vedlegg
  3. Deretter klikker du på "Svar"-knappen under "Melding"-fanen for å åpne en svarmelding.
  4. Til slutt, i den svarende e-posten, klikk på "Vedlagt"-linjen og trykk "Ctrl + V" -knappen for å lime inn de tidligere kopierte vedleggene.

4. Videresend e-post og fyll ut mottaker

  1. Først velger du en slik e-post og klikker deretter på "Videresend"-knappen på båndet.
  2. I det nye meldingsvinduet beholdes de originale vedleggene. Nå må du fylle ut "Til"-feltet til avsenderen av den opprinnelige e-posten.
  3. Eventuelt kan du endre emnet etter dine behov.

5. Send denne e-posten på nytt og endre mottakere

  1. Til å begynne med åpner du kilde-e-posten.
  2. Klikk deretter på "Handlinger"-knappen i "Flytt"-gruppen.
  3. Velg deretter "Send denne meldingen på nytt" fra rullegardinlisten.
  4. Kanskje du vil få et varsel om at du ikke er den opprinnelige avsenderen. Bare ignorer det og trykk "Ja".
  5. I den påfølgende nye e-posten bør du endre "Til"-feltet til avsenderen av den opprinnelige e-posten.
  6. Husk også å endre send via e-post-kontoen til din egen konto.

6. Legg til originale vedlegg automatisk via VBA

Alle tilnærminger nevnt ovenfor, for å være ærlig, er løsninger. Hvis du håper at Outlook automatisk kan beholde originale vedlegg når du svarer, kan du bruke denne måten.

  1. I hovedvinduet i Outlook, trykk "Alt + F11" -tastene.
  2. Deretter, i "Microsoft Visual Basic for Applications"-vinduet, kopierer du VBA-koden nedenfor til "ThisOutlookSession" -prosjektet.
Private WithEvents objExplorer As Outlook.Explorer
Private WithEvents objInspectors As Outlook.Inspectors
Private WithEvents objMail As Outlook.MailItem

Private Sub Application_Startup()
    Set objExplorer = Outlook.Application.ActiveExplorer
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objExplorer_Activate()
    On Error Resume Next
    If TypeName(objExplorer.Selection.Item(1)) = "MailItem" Then
       Set objMail = objExplorer.Selection.Item(1)
    End If
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeName(Inspector.CurrentItem) = "MailItem" Then
       Set objMail = Inspector.CurrentItem
    End If
End Sub

'Occurs when clicking "Reply" button
Private Sub objMail_Reply(ByVal Response As Object, Cancel As Boolean)
    Call KeepOriginalAttachments(objMail, Response)
End Sub

'Occurs when clicking "Reply All" button
Private Sub objMail_ReplyAll(ByVal Response As Object, Cancel As Boolean)
    Call KeepOriginalAttachments(objMail, Response)
End Sub

Private Sub KeepOriginalAttachments(ByVal objOriginalMail As MailItem, objReply As Object)
    Dim strEnviro As String
    Dim strTempFolder As String
    Dim strFilePath As String
    Dim objAttachment As Outlook.Attachment
 
    'Get the temp folder in Windows
    strEnviro = CStr(Environ("USERPROFILE"))
    strTempFolder = strEnviro & "\AppData\Local\Temp"
 
    For Each objAttachment In objOriginalMail.Attachments
        'Skip the embedded image attachments
        If IsEmbeddedAttachment(objAttachment) = False Then
           strFilePath = strTempFolder & "\" & objAttachment.filename
           objAttachment.SaveAsFile strFilePath
 
           'Attach the temporarily saved attachments to the Reply
           objReply.Attachments.Add strFilePath
 
           'Delete the temporarily saved attachments
           Kill strFilePath
       End If
    Next
End Sub

'Function for checking if an attachment is embedded image attachment
Function IsEmbeddedAttachment(objCurrentAttachment As Outlook.Attachment) As Boolean
    Dim objPropertyAccessor As Outlook.propertyAccessor
    Dim strProperty As String
 
    Set objPropertyAccessor = objCurrentAttachment.propertyAccessor
    strProperty = objPropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001E")
 
    If InStr(1, strProperty, "@") > 0 Then
       IsEmbeddedAttachment = True
    Else
       IsEmbeddedAttachment = False
    End If
End Function

VBA-kode - Behold de originale e-postvedleggene når du svarer

  1. Signer denne makroen senere og endre Outlook-makroinnstillingene for å tillate de signerte makroene.
  2. Deretter starter du Outlook-programmet på nytt for å aktivere dette VBA-prosjektet.
  3. Fra nå av, hver gang du klikker på "Svar"-knappen. Svar-e-posten vises med originale vedlegg på en gang.

Bruk et fremragende reparasjonsverktøy

Outlook har gått over andre e-postklienter på grunn av dets utallige funksjoner. Men det er fortsatt utsatt for korrupsjon. Derfor bør du være mer oppmerksom på helsen. Generelt, når du støter på små problemer, kan du ganske enkelt gå tilbake til det innebygde fikseverktøyet. Likevel, hvis du lider av alvorlige problemer, bør du gå tilbake til et mye mer dyktig verktøy, som f.eks. DataNumen Outlook Repair. Det kan fikse Outlook fil på et øyeblikk.

Forfatterintroduksjon:

Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert sql fikse og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med

Kommentarer er stengt.