Partager via


Méthode Recipients.ResolveAll (Outlook)

Tente de résoudre tous les objets Recipient de la collection Recipients par rapport au carnet d’adresses.

Syntaxe

expression. ResolveAll

Expression Variable qui représente un objet Recipients .

Valeur renvoyée

Renvoie True si tous les objets ont été résolus, False si un ou plusieurs ne l'ont pas été.

Exemple

Cet exemple Visual Basic pour Applications (VBA) utilise la méthode ResolveAll pour tenter de résoudre tous les destinataires et, en cas d’échec, affiche une boîte de message pour chaque destinataire non résolu.

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

Voir aussi

Recipients, objet

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.