Belirli Gelen E-postaları Outlook'unuzdaki Farklı Bir Hesap Üzerinden Otomatik Olarak İletme

Bazı kullanıcılar Outlook'ta birden fazla e-posta hesabı yapılandırmış ve birini varsayılan hesap olarak ayarlamıştır. Ancak, Outlook'un belirli gelen e-postaları başka bir hesap aracılığıyla otomatik olarak iletmesini de istiyorlar. Outlook'un böyle bir işlevi olmadığı için sadece bu yazıda paylaşılan VBA kodu ile gerçekleştirilebilir.

Örneğin, Outlook'unuzda iki POP3 e-posta hesabı kurdunuz ve Hesap 1'i varsayılan hesap olarak ayarladınız. Böylece, gelen tüm e-postalar Hesap 1'in Outlook dosyasına kaydedilir. Ve belirli gelen e-postaları başka birine otomatik olarak iletmek için bir Outlook kuralı oluşturursunuz. Şimdi, umduğunuz şey, tüm posta yönlendirmenin başka bir e-posta hesabı, yani Hesap 2 üzerinden yürütülmesidir. Ancak, Outlook kuralı böyle bir işlem sağlamaz. Bu nedenle, aşağıdaki gibi başka yöntemler kullanmanız gerekir.

Belirli Gelen E-postaları Farklı Bir Hesap Üzerinden Otomatik Yönlendirme

1. Başlamak için Outlook'ta "Alt + F11" aracılığıyla VBA düzenleyicisine erişin.
2. Ardından, VBA düzenleyicide, aşağıdaki VBA kodunu boştaki bir modüle yerleştirin.

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. Ardından, VBA düzenleyicisinden çıkın.
4. Daha sonra, "Ana Sayfa" sekmesinde "Kurallar" > "Kuralları ve Uyarıları Yönet"i tıklayın.
5. Ardından, yeni iletişim kutusunda "Yeni Kural" a basın.
6. Bundan sonra, “Aldığım mesajlara kuralı uygula” seçeneğini seçmeniz ve “İleri” ye tıklamanız gereken başka bir iletişim kutusu görüntülenecektir.
7. Ardından, yeni ekranda, “konudaki belirli kelimelerle” gibi kural koşulunu belirlemeniz ve “İleri” düğmesine basmanız gerekir.
8. Sonraki ekranda “run a script” seçeneğini seçip az önce eklediğiniz yeni makroyu seçmelisiniz.
9. Bundan sonra, ekrandaki sihirbazlara göre kural kurulumunu tamamlayabilirsiniz.
10. Şu andan itibaren, belirli bir e-posta belirli bir posta kutusuna her geldiğinde, Outlook onu başka bir belirli e-posta hesabı üzerinden otomatik olarak iletecektir.

Hasar Sonrası Outlook Verilerini Kurtarma

Outlook çok sayıda işlev sağlasa da, yine de hatalardan ve bozulmalardan arınmış olamaz. Outlook'unuz aniden çökerse, büyük olasılıkla Outlook veri dosyanız bozulmuş olabilir. O zaman, dahili bile Outlook onarımı Scanpst aracı size yardımcı olamaz. Gibi müthiş bir harici araçtan yardım almaktan başka seçeneğiniz yok. DataNumen Outlook Repair.

Yazar Tanıtımı:

Shirley Zhang, bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. bozuk sql ve görünüm onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com