Paano Awtomatikong Ilipat ang Mga Email sa Mga Tukoy na Mga Tatanggap ng CC sa Outlook

Sa katotohanan, karamihan sa inyo ay maaaring umaasang makagawa ng isang tuntunin sa Outlook para awtomatikong ilipat ang mga email na may mga partikular na tatanggap ng CC. Ngunit hindi sinusuportahan ng tuntunin sa Outlook ang pagsuri sa mga tatanggap ng CC. Kaya ituturo sa inyo ng artikulong ito kung paano ito gagawin gamit ang Outlook VBA.

Malinaw, imposible para sa iyo na lumikha ng isang panuntunan sa Outlook upang maghanap ng mga partikular na tatanggap ng CC. Gaya ng ipinapakita sa sumusunod na screenshot, para sa mga natanggap na email, maaari mo lamang tingnan kung ang iyong sariling pangalan ay nasa kahon ng CC. Katulad nito, para sa mga ipinadalang email, kahit na walang kundisyon ng panuntunan upang suriin ang kahon ng CC.

Samakatuwid, kung gusto mong i-configure ang Outlook upang awtomatikong ilipat ang mga email na may partikular na mga tatanggap ng CC, kailangan mong maghanap ng ibang paraan. Pagkatapos. dito namin ituturo sa iyo kung paano makamit ito sa pamamagitan ng Outlook VBA.

Awtomatikong Ilipat ang Mga Ipinadalang Email na may Mga Tukoy na Tatanggap ng CC

1. Una, pumunta sa tab na "Developer" at mag-click sa "Visual Basic" na buton.
2. Pagkatapos ay buksan ang proyektong "ThisOutlookSession" at kopyahin ang mga sumusunod na VBA code dito.

Public WithEvents olItems As Outlook.Items

Sub Application_Startup()
    Set olItems = Session.GetDefaultFolder(olFolderSentMail).Items
End Sub

Sub olItems_ItemAdd(ByVal Item As Object)
    If Item.Class = olMail Then
       MoveMail Item
    End If
End Sub

Sub MoveMail(Mail As Outlook.MailItem)
    Dim ccRecip As String
    Dim desFolder As Folder
 
    'Replace "test" with your desired CC'd recipient name or address
    ccRecip = "test"
    'The "Test" folder is a subfolder under "Sent Items" folder
    Set desFolder = Session.GetDefaultFolder(olFolderSentMail).Folders("Test")
 
    If InStr(LCase(Mail.CC), ccRecip) > 0 Then
       Mail.Move desFolder
    End If
End Sub

3. Sa dakong huli, dapat kang magpatuloy sa pagpirma sa code na ito at baguhin ang mga setting ng macro gaya ng dati.
4. Panghuli, maaari kang lumabas sa window na "Visual Basic". Pagkatapos noon, ang mga email na may partikular na mga tatanggap ng CC ay ililipat sa tinukoy na folder ng mail.

Awtomatikong Ilipat ang Mga Natanggap na Email na may Mga Tukoy na CC Recipient

Ngayon na ang VBA code sa itaas ay naglalayong ilipat ang mga ipinadalang email na may mga partikular na CC recipient, Kung gusto mong maghanap ng mga partikular na CC recipient sa mga natanggap na email at pagkatapos ay ilipat ito, dapat mong gamitin ang mga sumusunod na code sa halip.

Public WithEvents olItems As Outlook.Items

Sub Application_Startup()
    Set olItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub

Sub olItems_ItemAdd(ByVal Item As Object)
    If Item.Class = olMail Then
       MoveMail Item
    End If
End Sub

Sub MoveMail(Mail As Outlook.MailItem)
    Dim Recips As Recipients
    Dim Recip As Recipient
    Dim ccRecip As String
    Dim desFolder As Folder
 
    Set Recips = Mail.Recipients
    'Replace "test" with the specific words in your desired CC recipient address
    ccRecip = "test"
 
    For Each Recip In Recips
        If Recip.Type = olCC Then
           If InStr(LCase(Recip.Address), ccRecip) > 0 Then
              'The "Test" folder is a subfolder under "Inbox" folder
              Set desFolder = Session.GetDefaultFolder(olFolderInbox).Folders("Test")
              Mail.Move desFolder
           End If
        End If
    Next
End Sub

Panatilihing Maihanda para sa Korapsyon sa Outlook

Bagama't mayaman ang Outlook, hindi pa rin ito makakaligtas sa katiwalian. Kaya dapat kang manatiling mapagbantay laban sa lahat ng posibleng panganib. Walang alinlangan, ang kritikal na hakbang ay dapat na gumagawa ng pare-pareho at napapanahon na backup para sa data ng Outlook. Higit pa rito, dapat mong panatilihin ang isang sira na tool sa pagbawi ng Outlook sa paligid. Ito ay magiging kapaki-pakinabang kung ang parehong mga backup at Scanpst.exe ay nabigo.

Panimula ng May-akda:

Si Shirley Zhang ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang magkumpuni SQL Server error sa mdf file at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa