Outlookで特定の電子メールを送信するときに開封確認を自動要求する方法

Outlookソリューション 2025 年 9 月 29 日

Outlookの電子メールを送信するときに開封確認を要求することが許可されています。しかし、特定の電子メールを送信するときにOutlookが開封確認を自動的に要求できることを望む人さえいます。この記事では、OutlookVBAでそれを実現します。

一般に、開封確認を要求する場合は、XNUMXつの方法があります。 XNUMXつは、次のスクリーンショットのように、[新しいメッセージ]ウィンドウで[開封確認を要求する]オプションを手動でチェックすることです。

もうXNUMXつは、下の画像に示すように、Outlookオプションの[メール]タブで[送信されたすべてのメッセージについて、開封確認をリクエストする]を有効にすることです。

ただし、多くのユーザーは、メールの件名やメールの受信者などに応じて、特定のメールを送信した場合にのみ開封確認を自動的に要求するようにOutlookを構成したいと考えています。ここでは、OutlookVBAを使用してそれを実現する方法を紹介します。

特定のメールを送信する際の開封確認の自動リクエスト

最初に、Outlookを起動し、[開発者]タブに切り替えます。
次に、「Visual Basic」ボタンをクリックすると、新しいウィンドウが表示されます。
「VisualBasic」ウィンドウで「ThisOutlookSession」プロジェクトを開き、次のVBAコードをこのプロジェクトにコピーします。

Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    If Item.Class = olMail Then
       RequestReciept Item
    End If
End Sub

Sub RequestReciept(NewMail As MailItem)
    Dim Addr As String
    Dim Subj As String
 
    'Replace Addr & Subj with your own desired strings
    Addr = "example@mail.com"
    Subj = "test"
 
    'Specify the email recipients and subject
    If InStr(LCase(NewMail.To), Addr) > 0 And InStr(LCase(NewMail.Subject), Subj) Then
       NewMail.ReadReceiptRequested = True
    End If
End Sub

その後、このコードに署名し、デジタル署名されたマクロのみを有効にするようにマクロ設定を変更する必要があります。
最終的には、コードが正常に機能するかどうかを確認することができます。

Outlookのメインウィンドウで[新しいメール]ボタンをクリックします。
その後、通常どおりメールを作成できますが、受信者を選択し、コードに従って件名を入力します。私の場合、受信者にはexample@mail.comが含まれ、件名には「test」が含まれている必要があります。
次に「送信」ボタンをクリックします。
メールを送信したら、ダブルクリックして開くことができます。そのウィンドウで、「開発者」タブに移動し、「このフォームをデザイン」をクリックします。
その後、「（すべてのフィールド）」ラベルに移動し、「すべてのメールフィールド」を選択します。これで、「ReceiptRequested」フィールドが見つかるまで下にスクロールできます。領収書が必要かどうかを確認できます。

不明なメールには注意してください

今日、悪意のある電子メールはますます横行しています。したがって、すべてのOutlookユーザーは、疑わしいすべての電子メールに注意を払うことが不可欠です。さらに、堅牢なものを手に入れることもお勧めします Outlookの損傷修正ツール。あなたが絶望的なOutlookの破損に閉じ込められたときにそれはあなたの救助に来るでしょう。

著者紹介：

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