OutlookVBAを介して特定のドメイン内のユーザーにのみプレーンテキストの電子メールを送信する方法

今すぐ共有:

一部のユーザーは、電子メールアドレスが特定のドメインにある受信者にのみプレーンテキストの電子メールを送信したいと考えています。 この記事では、それを取得するためのスマートな方法を紹介します。

私の以前の記事では「特定の連絡先に対して常にOutlookの電子メールをプレーンテキスト形式で送信する方法」、特定の連絡先にのみプレーンテキストの電子メールを送信する2つのアプローチを取得できます。 特定のメールドメイン内のすべての連絡先にそのような電子メールを送信したい場合、その記事の2つの方法を使用することは、少し愚かで面倒です。 したがって、ここでは、はるかに効果的な別の方法を紹介します。

OutlookVBAを介して特定のドメイン内のユーザーにのみプレーンテキストの電子メールを送信する

特定のドメイン内のユーザーにのみプレーンテキストの電子メールを送信する

  1. まず、Outlookアプリケーションを起動する必要があります。
  2. 次に、Outlookのメイン画面で「Alt + F11」キーボタンを押す必要があります。
  3. 次に、「Microsoft Visual BasicforApplications」ウィンドウが表示されます。 その中で、「ThisOutlookSession」プロジェクトを開く必要があります。
  4. 続いて、次のVBAコードをコピーしてこのプロジェクトに貼り付けます。
'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

VBAコード-特定のドメイン内のユーザーにのみプレーンテキストの電子メールを送信する

  1. その後、このマクロに署名する必要があります。 「ツール」>「デジタル署名」をクリックし、画面上のウィザードに従って完了します。
  2. 後で、現在のウィンドウを終了します。 次に、「開発者」タブに切り替えて、「マクロセキュリティ」ボタンをタップします。 新しいポップアップダイアログボックスで、デジタル署名されたマクロを有効にするように設定を変更する必要があります。
  3. 最後に、あなたはショットを撮ることができます。 特定の電子メールドメインのXNUMX人の受信者への電子メールを作成して作成します。 そして、「送信」ボタンを押して送信します。 このプロセスで、Outlookは電子メール形式をプレーンテキストに自動的に変更します。

破損したOutlookファイルを復元する

Outlookは、ウイルス感染、マルウェア攻撃、電力サージなどに対して脆弱です。 したがって、破損後にOutlookデータを復元するためのヒントをいくつか学ぶ必要があります。 最初に、バックアップを確認する必要があります。 バックアップが古すぎるか、復元に失敗した場合は、組み込みツールであるScanpst.exeを利用できます。 もちろん、 受信トレイ修復ツール 常に効果的であるとは限りません。 したがって、次のような信頼性が高く、説得力のある外部ツールを準備する必要があります。 DataNumen Outlook Repair。 回収率が高いため、お勧めです。

著者紹介:

Shirley Zhangは、のデータ復旧の専門家です。 DataNumen、Inc。は、以下を含むデータ復旧技術の世界的リーダーです。 破損したSQL と見通し修理ソフトウェア製品。 詳細については、次のWebサイトをご覧ください。 WWW。datanumen.com

今すぐ共有:

コメントは締め切りました。