Outlookで投票していない人に通知メールをすばやく送信する方法

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

投票ボタン付きのメールを送信すると、受信者から投票応答が届きます。ただし、投票していない受信者がいる場合もあります。この場合、あなたは彼らに通知メールを送ることを望むかもしれません。この記事はあなたがそれを素早く手に入れるのを助けるでしょう。

Outlookでは、ユーザーは投票ボタン付きの電子メールを送信できます。このようなメールを多くの受信者に送信した場合は、できるだけ早く投票の回答を受け取ることをお勧めします。それでも、一部の受信者が数日経っても投票していないことに気付いた場合は、通知メールを送信することをお勧めします。この場合、標準的な方法で受信者を手動で抽出する必要があり、少し面倒です。さて、以下では、あなたにもう一つのより便利な方法を紹介します。

投票していない人に通知メールを送信する

最初に、「Alt + F11」をタップして、OutlookVBAエディターをトリガーします。
次に、次のコードをコピーして未使用のモジュールに貼り付けます。

Sub SendNotification_ThoseNotVoted()
    Dim objMail As Outlook.MailItem
    Dim objRecipient As Outlook.Recipient
    Dim objNotification As Outlook.MailItem
 
    Select Case Application.ActiveWindow.Class
           Case olInspector
                Set objMail = ActiveInspector.CurrentItem
           Case olExplorer
                Set objMail = ActiveExplorer.Selection(1)
    End Select
 
    'Create a notification email
    Set objNotification = Outlook.Application.CreateItem(olMailItem)
 
    'Add those who haven't voted to the notification email as recipients
    For Each objRecipient In objMail.Recipients
        If objRecipient.TrackingStatus = olTrackingNone Then
           objNotification.Recipients.Add objRecipient.Address
        Else
           If objRecipient.AutoResponse = "" Then
              objNotification.Recipients.Add objRecipient.Address
           End If
        End If
    Next
 
    'Set the notification email details
    With objNotification
         .Recipients.ResolveAll
         .Subject = "Please Vote!!!"
         .Body = "Please vote as soon as possible!!"
         .Attachments.Add objMail
         '.Send ==> To directly send out
         .Display
    End With
End Sub

その後、後で便宜上、このマクロを「クイックアクセスツールバー」を参照して追加します。OutlookでVBAコードを実行する方法"
最終的に、このマクロを実行するには、以下の操作を実行します。

まず、投票ボタンで元のメールを選択または開きます。
次に、クイックアクセスツールバーのマクロボタンをクリックします。
以下のスクリーンショットのように、すぐに新しいメールが表示されます。これには、「宛先」フィールドに投票していない元の受信者が含まれます。そして、その件名と本文は、コードの事前定義された値に従って設定されています。

厄介なOutlookの問題に対処する

他のアプリケーションと同様に、Outlookは、クラッシュ、フリーズ、頻繁なエラーメッセージなど、さまざまな問題が発生する可能性があります。間違いなく、誰もそれらに遭遇することはありません。しかし、それらを回避することは確かに困難です。あなたができることはあなたのPSTファイルが壊れている場合でもあなたがまだする必要なしにそれでも貴重なOutlookデータを取り戻すことができるようにあなたのOutlookファイルを定期的にバックアップすることに固執することです PSTを修復する.

著者紹介：

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