Si të Përcillni automatikisht emailet hyrëse specifike përmes një llogarie të ndryshme në Outlook tuaj

Disa përdorues kanë konfiguruar më shumë se një llogari emaili në Outlook dhe kanë vendosur një si llogarinë e paracaktuar. Por, ata gjithashtu dëshirojnë që Outlook të përcjellë automatikisht emailet hyrëse specifike përmes një llogarie tjetër. Outlook nuk ka një funksion të tillë, kështu që mund të realizohet vetëm me kodin VBA të ndarë në këtë artikull.

Për shembull, ju keni vendosur dy llogari të postës elektronike POP3 në Outlook dhe keni vendosur Llogarinë 1 si llogarinë e paracaktuar. Kështu, të gjitha emailet hyrëse do të ruhen në skedarin Outlook të llogarisë 1. Dhe ju krijoni një rregull të Outlook për t'i përcjellë automatikisht emailet specifike hyrëse te dikujt tjetër. Tani, ajo që shpresoni është që të gjitha përcjelljet e postës të ekzekutohen përmes një llogarie tjetër emaili, domethënë Llogaria 2. Megjithatë, rregulli i Outlook nuk ofron një veprim të tillë. Kështu, ju duhet të përdorni metoda të tjera, siç është mënyra e mëposhtme.

Përcjell automatikisht emailet hyrëse specifike përmes një llogarie të ndryshme

1. Për të filluar, në Outlook, hyni në redaktuesin VBA përmes "Alt + F11".
2. Më pas, në redaktorin VBA, vendosni kodin e mëposhtëm VBA në një modul të papunë.

Sub AutoForwardMailsThroughAnotherAccount(objMail As Outlook.MailItem)
    Dim objForwardMail As Outlook.MailItem
    Dim objRecipient As Outlook.Recipient
    Dim objMailAccounts As Outlook.Accounts
    Dim objMailAccount As Outlook.Account
 
    Set objForwardMail = objMail.Forward
    'Change the recipients of forwarding email
    Set objRecipient = objForwardMail.Recipients.Add("shelly@datanumen.com")
    objRecipient.Type = olTo
    objForwardMail.Recipients.ResolveAll
 
    Set objMailAccounts = Outlook.Application.Session.Accounts
    For Each objMailAccount In objMailAccounts
        'Replace "John Smith" with the display name of your email account
        If objMailAccount.DisplayName = "John Smith" Then
           objForwardMail.SendUsingAccount = objMailAccount
           objForwardMail.Send
        End If
    Next
End Sub

3. Tjetra, dilni nga redaktori VBA.
4. Më pas, klikoni "Rregullat" > "Menaxho rregullat dhe sinjalizimet" në skedën "Home".
5. Pastaj, në kutinë e re të dialogut, shtypni "Rregull i ri".
6. Pas kësaj, do të shfaqet një kuti tjetër dialogu, në të cilën duhet të zgjidhni "Zbato rregullin për mesazhet që marr" dhe klikoni "Next".
7. Më pas, në ekranin e ri, duhet të vendosni kushtin e rregullit, si "me fjalë specifike në temë" dhe të shtypni "Next".
8. Në ekranin pasues, duhet të zgjidhni "të ekzekutoni një skript" dhe të zgjidhni makronë e re që keni shtuar tani.
9. Pas kësaj, mund të përfundoni konfigurimin e rregullave sipas magjistarëve në ekran.
10. Që tani e tutje, sa herë që një email specifik të futet në kutinë postare specifike, Outlook do ta përcjellë atë automatikisht përmes një llogarie tjetër specifike të postës elektronike.

Shpëtoni të dhënat e Outlook pas dëmtimit

Megjithëse Outlook ofron sasi funksionesh, ai ende nuk mund të jetë pa gabime dhe korrupsion. Nëse Outlook-i juaj rrëzohet papritur, ekziston një shans i keq që skedari juaj i të dhënave Outlook të jetë i korruptuar. Në atë kohë, edhe inbuilt Riparimi i parashikimeve mjeti Scanpst nuk është në gjendje t'ju ndihmojë. Ju nuk keni alternativë veçse të merrni ndihmë nga një mjet i jashtëm i frikshëm, 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 i korruptuar dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com