SelectNamesDialog-Objekt (Outlook)

Das Dialogfeld Namen auswählen wird für den Benutzer angezeigt, damit er Einträge aus einer oder mehreren Adresslisten auswählen kann, und die ausgewählten Einträge werden im durch die SelectNamesDialog.Recipients -Eigenschaft angegebenen Auflistungsobjekt zurückgegeben.

Hinweise

Sie können eine Instanz des SelectNamesDialog -Objekts instanziieren, indem Sie NameSpace.GetSelectNamesDialog aufrufen.

Das von SelectNamesDialog.Display angezeigte Dialogfeld ähnelt dem Dialogfeld Namen auswählen in der Outlook-Benutzeroberfläche. Die Größen- und Positionseinstellungen des integrierten Dialogfelds Namen auswählen werden verwendet. Im Standardzustand wird jedoch nicht Nachrichtenempfänger über den Eingabefeldern An, Cc und Bcc angezeigt. Weitere Informationen zur Verwendung des SelectNamesDialog-Objekts zum Anzeigen des Dialogfelds Namen auswählen finden Sie unter Anzeigen von Namen aus dem Adressbuch.

Beispiel

Das folgende Codebeispiel veranschaulicht, wie das SelectNamesDialog -Objekt verwenden, um Einträge aus dem Ordner Kontakte in einem Dialogfeld anzuzeigen, die das Dialogfeld Namen auswählen auf der Outlook-Benutzeroberfläche ähnelt.

Sub ShowContactsInDialog() 
 
 Dim oDialog As SelectNamesDialog 
 
 Dim oAL As AddressList 
 
 Dim oContacts As Folder 
 
 
 
 Set oDialog = Application.Session.GetSelectNamesDialog 
 
 Set oContacts = _ 
 
 Application.Session.GetDefaultFolder(olFolderContacts) 
 
 
 
 'Look for the address list that corresponds with the Contacts folder 
 
 For Each oAL In Application.Session.AddressLists 
 
 If oAL.GetContactsFolder = oContacts Then 
 
 Exit For 
 
 End If 
 
 Next 
 
 With oDialog 
 
 'Initialize the dialog box with the address list representing the Contacts folder 
 
 .InitialAddressList = oAL 
 
 .ShowOnlyInitialAddressList = True 
 
 If .Display Then 
 
 'Recipients Resolved 
 
 'Access Recipients using oDialog.Recipients 
 
 End If 
 
 End With 
 
End Sub

Methoden

Eigenschaften

Siehe auch

Outlook-Objektmodellreferenz

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.