Kako samodejno posredovati priloge samo na podlagi določenih meril v Outlooku?
Običajno je pri posredovanju e-pošte vključeno tudi izvirno telo sporočila in priloge. Toda včasih morate samo priloge poslati samo priponkam brez izvirnega sporočila na podlagi meril določeni osebi. Kako ste lahko rešili to nalogo v Outlooku?
Samo priloge, ki temeljijo na določenih merilih, samodejno posredujte osebi s kodo VBA
Samo priloge, ki temeljijo na določenih merilih, samodejno posredujte osebi s kodo VBA
Na primer, ko prejmete e-poštno sporočilo, katerega predmet vsebuje besedilo »funkcija kto«, bodo vse priloge tega e-poštnega sporočila samodejno posredovane določeni osebi brez telesa sporočila. Naslednji koraki vam lahko pomagajo, naredite naslednje:
1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
2. v Microsoft Visual Basic za aplikacije okno, dvokliknite Ta OutlookSession Iz Projekt1 (VbaProject.OTM) , da odprete način, nato pa v prazen modul kopirajte in prilepite naslednjo kodo.
Koda VBA: Samodejno posredovanje e-pošte brez telesa sporočila, vendar samo vključite priloge:
Public WithEvents ReceivedItems As Outlook.Items
Private Sub Application_Startup()
Set ReceivedItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub ReceivedItems_ItemAdd(ByVal Item As Object)
Dim xForwardMail As Outlook.MailItem
Dim xEmail As MailItem
On Error Resume Next
If Item.Class <> olMail Then Exit Sub
Set xEmail = Item
If InStrRev(UCase(xEmail.Subject), UCase("kto feature")) = 0 Then Exit Sub 'change subject text to your need
If xEmail.Attachments.Count = 0 Then Exit Sub
Set xForwardMail = xEmail.Forward
With xForwardMail
.HTMLBody = ""
With .Recipients
.Add "" 'change address to your own
.ResolveAll
End With
.Send
End With
End Sub
Opombe: V zgornji kodi morate besedilo zadeve in naslov prejemnika spremeniti v svojega.
3. Nato shranite kodo in znova zaženite Outlook, da začne učinkovati.
4. Odslej bo Outlook vsakič, ko novo e-poštno sporočilo vsebuje določeno besedilo zadeve, prispe v vaš nabiralnik, Outlook samodejno posreduje svoje priloge brez telesa sporočila želeni osebi.
Opombe: Ta koda je na voljo samo za privzeti račun.
Najboljša pisarniška orodja za produktivnost
Kutools za Outlook - Več kot 100 zmogljivih funkcij za nadgradnjo vašega Outlooka
🤖 AI poštni pomočnik: Takojšnja profesionalna e-poštna sporočila z umetno inteligenco – z enim klikom do genialnih odgovorov, popoln ton, večjezično znanje. Preoblikujte pošiljanje e-pošte brez napora! ...
📧 Avtomatizacija e-pošte: Odsoten (na voljo za POP in IMAP) / Načrtujte pošiljanje e-pošte / Samodejna CC/BCC po pravilih pri pošiljanju e-pošte / Samodejno naprej (napredna pravila) / Samodejno dodaj pozdrav / E-poštna sporočila več prejemnikov samodejno razdeli na posamezna sporočila ...
📨 Email upravljanje: Enostaven priklic e-pošte / Blokiraj prevarantska e-poštna sporočila glede na teme in druge / Izbriši podvojena e-poštna sporočila / napredno iskanje / Združite mape ...
📁 Priloge Pro: Shrani paket / Batch Detach / Paketno stiskanje / Samodejno shranite / Samodejno loči / Samodejno stiskanje ...
🌟 Vmesnik Magic: 😊Več lepih in kul emojijev / Povečajte Outlookovo produktivnost s pogledi z zavihki / Minimizirajte Outlook, namesto da bi ga zaprli ...
???? Čudeži z enim klikom: Odgovori vsem z dohodnimi prilogami / E-poštna sporočila proti lažnemu predstavljanju / 🕘Pokaži pošiljateljev časovni pas ...
👩🏼🤝👩🏻 Stiki in koledar: Paketno dodajanje stikov iz izbranih e-poštnih sporočil / Razdelite skupino stikov na posamezne skupine / Odstranite opomnike za rojstni dan ...
Over 100 Lastnosti Čakajte na svoje raziskovanje! Kliknite tukaj, če želite odkriti več.