Recipients.ResolveAll メソッド (Outlook)

アドレス帳の 受信者 コレクションのすべての 受信者 オブジェクトを解決しようとしています。

構文

式。 ResolveAll

式Recipients オブジェクトを表す変数。

戻り値

True のすべてのオブジェクトに解決された場合、 False 場合は、1 つまたは複数がありませんでした。

例

このVisual Basic for Applications (VBA) の例では、ResolveAll メソッドを使用してすべての受信者の解決を試み、失敗した場合は、未解決の受信者ごとにメッセージ ボックスを表示します。

Sub CheckRecipients() 
 
 Dim MyItem As Outlook.MailItem 
 
 Dim myRecipients As Outlook.Recipients 
 
 Dim myRecipient As Outlook.Recipient 
 
 
 
 Set myItem = Application.CreateItem(olMailItem) 
 
 Set myRecipients = myItem.Recipients 
 
 myRecipients.Add("Aaron Con") 
 
 myRecipients.Add("Nate Sun") 
 
 myRecipients.Add("Dan Wilson") 
 
 If Not myRecipients.ResolveAll Then 
 
 For Each myRecipient In myRecipients 
 
 If Not myRecipient.Resolved Then 
 
 MsgBox myRecipient.Name 
 
 End If 
 
 Next 
 
 End If 
 
End Sub

関連項目

受信者オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。