Slik videresender du spesifikke innkommende e-poster automatisk med tilpasset emne og brødtekst i Outlook

Outlook-løsninger September 29, 2025

For å automatisk videresende spesifikke innkommende e-poster, vil du først tenke på å bruke regler i Outlook. Likevel støtter ikke regelen deg til å tilpasse e-postemne og brødtekst ved videresending. Hvis du vil automatisk videresende spesifikke e-poster med tilpasset emne og brødtekst, kan du bruke metoden introdusert i denne artikkelen.

Som vi alle vet, kan Outlook-regler støtte brukere til automatisk å videresende spesifikke innkommende e-poster. På den måten vil e-posten automatisk videresendes til de spesifikke personene med emnet i mønsteret "FW: original postemne" og den originale postteksten. Imidlertid håper mange brukere å automatisk videresende e-poster med tilpasset emne og brødtekst. Regler kan tilsynelatende ikke innse det. Derfor vil vi her introdusere en tilnærming for å få det enkelt.

Videresend spesifikke innkommende e-poster automatisk med tilpasset emne og brødtekst

  1. Helt i begynnelsen, start Outlook-programmet ditt.
  2. Deretter får du tilgang til VBA editor med referanse til "Hvordan kjøre VBA-kode i Outlook".
  3. Deretter kopierer og limer du inn følgende VBA-kode i "ThisOutlookSession" -prosjektet.
Public WithEvents objInbox As Outlook.Folder
Public WithEvents objInboxItems As Outlook.Items

Private Sub Application_Startup()
    Set objInbox = Outlook.Application.Session.GetDefaultFolder(olFolderInbox)
    Set objInboxItems = objInbox.Items
End Sub

Private Sub objInboxItems_ItemAdd(ByVal Item As Object)
    Dim objMail As Outlook.MailItem
    Dim objForward As Outlook.MailItem
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
 
       'If it is a specific new email
       If (objMail.SenderEmailAddress = "bob_black@datanumen.com") And (objMail.Importance = olImportanceHigh) And (objMail.Attachments.Count > 0) Then
 
           Set objForward = objMail.Forward
           'Customize the forward subject, body and recipients
           With objForward
                .Subject = "Custom Subject"
                .HTMLBody = "<HTML><BODY>Type body here. </BODY></HTML>" & objForward.HTMLBody
                .Recipients.Add ("boss@datanumen.com")
                .Recipients.Add ("john@datanumen.com")
                .Recipients.ResolveAll
                .Importance = olImportanceHigh
                .Send
           End With
       End If
    End If
End Sub

VBA-kode - Automatisk videresending av spesifikke innkommende e-poster med tilpasset emne og brødtekst

  1. Deretter endrer du kriteriene for spesifiserte innkommende e-poster. Og endre den spesifikke teksten, emnet og mottakerne i koden i henhold til dine behov.
  2. Til slutt, klikk på "Application_Startup"-underrutinen og trykk "F5"-tasten.
  3. Siden den gang, hver gang en bestemt innkommende ankommer i standard innboks-mappen, vil Outlook automatisk videresende den med tilpasset emne og brødtekst til de forhåndsdefinerte mottakerne.Automatisk videresending av e-poster

Løs Outlook-problemer fleksibelt

Selv om Outlook er funksjonsrikt, er det ikke i stand til å være immun mot feil og andre problemer. For eksempel kan Outlook PST-filen lett bli ødelagt på grunn av flere faktorer. Disse inkluderer menneskelige feil, virus, overdimensjonerte PST-filer og skadede Outlook-profiler og så videre. Derfor må du ta noen forholdsregler, for eksempel å være forsiktig med Outlook PST-filstørrelsen, holde alle virus i sjakk samt få tak i en robust Outlook gjenoppretting verktøy, for eksempel DataNumen Outlook Repair.

Forfatterintroduksjon:

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

Kommentarer er stengt.