Sådan videresendes automatisk specifikke indgående e-mails med brugerdefineret emne og hovedtekst i Outlook

For automatisk at videresende specifikke indgående e-mails skal du først tænke på at bruge regler i Outlook. Alligevel understøtter reglen dig ikke i at tilpasse e-mailens emne og brødtekst ved videresendelse. Hvis du vil automatisk videresende specifikke e-mails med tilpasset emne og brødtekst, kan du bruge metoden introduceret i denne artikel.

Som vi alle ved, kan Outlook-regler understøtte brugere til automatisk at videresende specifikke indgående e-mails. På den måde vil e-mailen automatisk blive videresendt til de specifikke personer med emnet i mønsteret "FW: original mail subject" og den originale mail body. Imidlertid håber mange brugere at automatisk videresende e-mails med tilpasset emne og brødtekst. Tilsyneladende kan regler ikke indse det. Derfor vil vi her introducere en tilgang til at få det med lethed.

Videresend automatisk specifikke indgående e-mails med tilpasset emne og brødtekst

  1. Fra begyndelsen, start dit Outlook-program.
  2. Få derefter adgang til VBA editor med henvisning til "Sådan køres VBA-kode i din Outlook".
  3. Kopier derefter og indsæt følgende VBA-kode i projektet “ThisOutlookSession”.
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 - Videresend automatisk specifikke indgående e-mails med tilpasset emne og krop

  1. Derefter skal du ændre kriterierne for specificerede indgående e-mails. Og modificer den specifikke krop, emne og modtagere i koden efter dine behov.
  2. Til sidst skal du klikke på "Application_Startup ”underrutine og tryk på“ F5 ”-tasten.
  3. Siden da vil Outlook automatisk videresende den med tilpasset emne og brødtekst til de foruddefinerede modtagere, hver gang en bestemt indgående ankommer i din standardindbakkemappe.Automatisk videresend e-mails

Adresser Outlook-problemer fleksibelt

Selvom Outlook er rig på funktioner, er den ikke i stand til at være immun over for fejl og andre problemer. For eksempel kan Outlook PST-fil nemt blive beskadiget på grund af flere faktorer. Disse omfatter menneskelige fejl, vira, overdimensionerede PST-filer og beskadigede Outlook-profiler og så videre. Derved skal du tage nogle forholdsregler, såsom at være forsigtig med Outlook PST-filstørrelsen, holde alle vira på afstand samt få fat i en robust Outlook opsving værktøj, såsom DataNumen Outlook Repair.

Forfatter Introduktion:

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

Kommentarer er lukket.