Ինչպես արագ ստեղծել Outlook կանոն ՝ մի քանի նամակներ ուղարկողներին արգելափակելու համար

Եթե ​​ցանկանում եք ստեղծել կանոն՝ մի քանի ընտրված նամակների ուղարկողներին արգելափակելու համար, սովորաբար, նախ պետք է գրեք ուղարկողներին, ապա ձեռքով կանոն ստեղծեք: Դա բավականին անհանգիստ է։ Այսպիսով, այստեղ մենք կկիսվենք այն մեկ սեղմումով ստանալու շատ ավելի արագ մեթոդով:

Որոշ օգտատերեր կարծում են, որ Outlook-ում ներկառուցված «ant-spam» ֆունկցիան այնքան արդյունավետ չէ, որքան նրանք հույս ունեն: Հետեւաբար, նրանք սովոր են ստեղծել Outlook-ի կանոններ՝ ուղարկողներին արգելափակելու համար։ Այժմ, ստորև, մենք կներկայացնենք արագ մեթոդ՝ բազմաթիվ նամակներ ուղարկողներին արգելափակելու կանոն ստեղծելու համար:

Արագ ստեղծեք մի քանի էլփոստ ուղարկողներին արգելափակելու կանոն

1. Համար, ինչպեսtart, գործարկել Outlook ծրագիրը:
2. Այնուհետև մուտքագրեք VBA խմբագրիչի պատուհանը «Alt + F11» դյուրանցման միջոցով:
3. Հաջորդը, նոր պատուհանում, տեղադրեք հետևյալ VBA կոդը չօգտագործված մոդուլի մեջ:

Sub CreateRuleForBlockingMultipleSenders()
    Dim objRules As Outlook.Rules
    Dim objRule As Outlook.Rule
    Dim objMoveRuleAction As Outlook.MoveOrCopyRuleAction
    Dim objFromCondition As Outlook.ToOrFromRuleCondition
    Dim objSelection As Outlook.Selection
    Dim objMail As Outlook.MailItem
    Dim objJunkFolder As Outlook.Folder
 
    Set objRules = Application.Session.DefaultStore.GetRules()
    'Create a rule
    Set objRule = objRules.Create("Block Senders", olRuleReceive)
    Set objFromCondition = objRule.Conditions.From
 
    'Get the selected emails
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
    'Get Junk Email folder
    Set objJunkFolder = Outlook.Application.Session.GetDefaultFolder(olFolderJunk)
 
    For i = objSelection.Count To 1 Step -1
        If objSelection.Item(i).Class = olMail Then
 
           Set objMail = objSelection.Item(i)
 
           'Add the email senders to rule condition
           With objFromCondition
                .Enabled = True
                .Recipients.Add objMail.SenderEmailAddress
                .Recipients.ResolveAll
           End With
 
           'Move the emails from blocked senders to Junk Email folder
           Set objMoveRuleAction = objRule.Actions.MoveToFolder
           With objMoveRuleAction
                .Enabled = True
                .Folder = objJunkFolder
           End With
         End If
    Next
 
    objRules.Save
End Sub

4. Դրանից հետո, համաձայն «Ինչպես գործարկել VBA կոդը ձեր Outlook- ում«, ավելացրեք այս մակրո արագ մուտքի գործիքագոտին կամ ժապավենին:
5. Այնուհետև, դուրս եկեք VBA խմբագրիչից սովորաբար:
6. Ի վերջո, փորձեք հետևյալ քայլերը.

• Նախ ընտրեք այն նամակները, որոնց ուղարկողներին ցանկանում եք արգելափակել:
• Այնուհետև սեղմեք նոր մակրո կոճակը:
• Մակրո ավարտից հետո կարող եք գնալ «Ֆայլ» ընտրացանկ և սեղմել «Կառավարել կանոնները և զգուշացումները» կոճակը՝ նոր ավելացված կանոնը ստուգելու համար, ինչպես ցույց է տրված ստորև նկարում:

Պահպանեք չարամիտ նամակները Bay- ում

Անկախ նրանից, թե որ էլփոստի հաճախորդն եք օգտագործում, դուք պետք է հաճախակի ստանաք նամակներ անհայտ ուղարկողներից: Մost նամակներից կարող են լինել գովազդային սպամ և նույնիսկ պարունակել վնասակար մակրոներ: Նրանք կարող են վնասել ձեր Outlook ֆայլը կարճ ժամանակում: Այսպիսով, Outlook-ում դուք պետք է արդյունավետ միջոցներ ձեռնարկեք անհայտ նամակները արգելափակելու համար: Բացի այդ, եթե դուք կարող եք դա թույլ տալ, ապա նպատակահարմար է պատրաստել հզոր PST վերականգնման գործիք, ինչպիսին է DataNumen Outlook Repair. Դա կարող է վերանորոգել Outlook- ը ֆայլ առանց քրտնելու, անկախ նրանից, թե որքան լուրջ է այն վնասված:

Հեղինակի ներածություն.

Shirley Zhang- ը տվյալների վերականգման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում sql վերականգնում և հեռանկարների նորոգման ծրագրակազմի արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com