Düz Metin E-postalarını Outlook VBA Aracılığıyla Yalnızca Belirli Bir Etki Alanındaki Kişilere Gönderme

Bazı kullanıcılar Düz Metin e-postalarını yalnızca e-posta adresleri belirli bir etki alanında olan alıcılara göndermek ister. Bu makale, onu elde etmek için akıllı bir yöntem sunacaktır.

Bir önceki yazımda “Outlook E-postalarını Belirli Kişiler İçin Her Zaman Düz Metin Biçiminde Gönderme”, Düz Metin e-postalarını yalnızca belirli kişilere göndermek için 2 yaklaşım elde edebilirsiniz. Bu tür e-postaları belirli bir posta alanındaki tüm kişilere göndermek istiyorsanız, o makaledeki 2 yolu kullanmak biraz aptalca ve zahmetli olacaktır. Bu nedenle, burada size çok daha etkili olan başka bir yolu paylaşacağız.

Yalnızca Belirli Bir Alan Adındakilere Düz Metin E-postaları Gönderin

1. Her şeyden önce, Outlook uygulamanızı başlatmalısınız.
2. Ardından, Outlook ana ekranında “Alt + F11” tuşlarına basmanız gerekir.
3. Ardından, “Uygulamalar için Microsoft Visual Basic” penceresi açılacaktır. İçinde “ThisOutlookSession” projesini açmalısınız.
4. Ardından, aşağıdaki VBA kodunu kopyalayıp bu projeye yapıştırın.

'Occurs when sending an Outlook email
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMail As Outlook.MailItem
    Dim objRecipient As Outlook.recipient
    Dim strAddress, strDomain As String
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
       For Each objRecipient In objMail.Recipients
           'Get the recipient's email domain
           strAddress = objRecipient.Address
           strDomain = Right(strAddress, Len(strAddress) - InStr(strAddress, "@"))
 
           'If the domain is the specific one
           'Change the "datanumen.com" as per your needs
           If strDomain = "datanumen.com" Then
              'Convert the email format to plain text
              objMail.BodyFormat = olFormatPlain
              objMail.Save
              Exit For
           End If
      Next
    End If
End Sub

5. Daha sonra bu makroyu imzalamanız gerekiyor. "Araçlar" > "Dijital İmza"ya tıklayın ve tamamlamak için ekrandaki sihirbazı izleyin.
6. Daha sonra mevcut pencereden çıkın. Ardından “Geliştirici” sekmesine geçin ve “Makro Güvenliği” düğmesine dokunun. Yeni açılan iletişim kutusunda, dijital olarak imzalanmış makroları etkinleştirmek için ayarları değiştirmelisiniz.
7. Son olarak, bir çekim yapabilirsiniz. Belirli bir e-posta etki alanındaki bir alıcı için bir e-posta oluşturun ve oluşturun. Ve göndermek için "Gönder" düğmesine basın. Bu süreçte Outlook, e-posta biçimini otomatik olarak Düz Metin olarak değiştirecektir.

Bozuk Outlook Dosyalarını Geri Yükle

Outlook, virüs bulaşmasına, kötü amaçlı yazılım saldırılarına, güç dalgalanmasına vb. karşı savunmasızdır. Bu nedenle, yolsuzluktan sonra Outlook verilerini geri yüklemek için bazı ipuçları öğrenmeliyiz. İlk başta, yedeklerinizi kontrol etmelisiniz. Yedekleme çok eskiyse veya geri yüklenemezse, yerleşik araç olan Scanpst.exe'yi kullanabilirsiniz. Tabii ki, gelen kutusu onarım aracı her zaman etkili değildir. Bu nedenle, güvenilir ve inandırıcı bir harici araç hazırlamanız daha iyi olur. DataNumen Outlook Repair. İyileşme oranı yüksek olduğu için tavsiye edilir.

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