Recipients.ResolveAll method (Outlook)
Versucht, alle Recipient-Objekte in der Recipients-Auflistung für das Adressbuch aufzulösen.
Syntax
expression. ResolveAll
Ausdruck Eine Variable, die ein Recipient-Objekt darstellt.
Rückgabewert
True, wenn alle Objekte aufgelöst wurden, False, wenn mindestens ein Objekt nicht aufgelöst wurde.
Beispiel
In diesem beispiel für Visual Basic for Applications (VBA) wird die ResolveAll-Methode verwendet, um zu versuchen, alle Empfänger aufzulösen. Wenn dies nicht erfolgreich ist, wird ein Meldungsfeld für jeden nicht aufgelösten Empfänger angezeigt.
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
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.