Për të përcjellë automatikisht emaile specifike hyrëse, fillimisht do të mendoni të përdorni rregullat në Outlook. Megjithatë, rregulli nuk ju mbështet që të personalizoni subjektin dhe trupin e emailit gjatë përcjelljes. Nëse dëshironi të përcillni automatikisht emaile specifike me subjekt dhe tekst të personalizuar, mund të përdorni metodën e prezantuar në këtë artikull.
Siç e dimë të gjithë, rregullat e Outlook mund t'i mbështesin përdoruesit që të përcjellin automatikisht emaile specifike hyrëse. Në këtë mënyrë, emaili do t'u përcillet automatikisht personave specifikë me temën në modelin "FW: subjekti i postës origjinale" dhe trupi origjinal i postës. Megjithatë, shumë përdorues shpresojnë të përcjellin automatikisht emailet me subjekt dhe trup të personalizuar. Me sa duket, rregullat nuk mund ta kuptojnë atë. Prandaj, këtu do të prezantojmë një qasje për ta marrë atë me lehtësi.
Përcjell automatikisht email-et hyrëse specifike me subjekt dhe trup të personalizuar
- Që në fillim, starnë programin tuaj Outlook.
- Pastaj, merrni akses në redaktuesin VBA duke iu referuar "Si të ekzekutoni kodin VBA në Outlook tuaj".
- Më pas, kopjoni dhe ngjisni kodin e mëposhtëm VBA në projektin "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
- Pas kësaj, ndryshoni kriteret e emaileve hyrëse të specifikuara. Dhe modifikoni trupin specifik, subjektin dhe marrësit në kod sipas nevojave tuaja.
- Përfundimisht, klikoni në "Application_Startup” dhe shtypni tastin “F5”.
- Që atëherë, çdo herë kur një hyrje specifike arrin në dosjen tuaj të paracaktuar të Inbox, Outlook do ta përcjellë atë automatikisht me subjektin dhe trupin e personalizuar te marrësit e paracaktuar.
Adresoni çështjet e Outlook në mënyrë fleksibël
Megjithëse Outlook është i pasur me veçori, ai nuk është në gjendje të jetë i imunizuar nga gabimet dhe problemet e tjera. Për shembull, skedari PST i Outlook mund të korruptohet lehtësisht për shkak të shumë faktorëve. Këto përfshijnë gabime njerëzore, viruse, skedarë të tepërt PST dhe profile të dëmtuara të Outlook etj. Prandaj, ju duhet të merrni disa masa paraprake, të tilla si mbajtja e kujdesshme ndaj madhësisë së skedarit të Outlook PST, mbajtja e të gjithë viruseve në distancë, si dhe mbajtja e një kontrolli të fortë Rimëkëmbja e opinionit mjet, si p.sh DataNumen Outlook Repair.
Hyrje e autorit:
Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë SQL Server shërim dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com