SelectNamesDialog.InitialAddressList-Eigenschaft (Outlook)
Dient zum Zurückgeben oder Festlegen eines AddressList -Objekts, das die anfängliche Adressliste bestimmt, die im Dialogfeld Namen auswählen angezeigt wird. Lese-/Schreibzugriff.
Syntax
Ausdruck. InitialAddressList
Ausdruck Eine Variable, die ein SelectNamesDialog-Objekt darstellt.
Hinweise
Festlegen der InitialAddressList -Eigenschaft ist die programmgesteuerte Entsprechung zum Auswählen eines AddressList-Objekt aus der Dropdownliste für Adressbuch im Dialogfeld Namen auswählen.
InitialAddressList ist sein Standardzustand das AddressList-Objekt, das die Eigenschaft hat, die die AddressList.IsInitialAddressList auf True festgelegt. IsInitialAddressList entspricht dem Festlegen von Diese Adressliste erste im Dialogfeld Adressierung, die zur Verfügung steht, indem Sie auf Extras und dann auf Optionen im Dialogfeld Adressbuch.
Beispiel
Das folgende Codebeispiel veranschaulicht, wie InitialAddressList und SelectNamesDialog.ShowOnlyInitialAddressList verwenden, um das Dialogfeld Namen auswählen immer nur die Adressliste in den Standardordner Kontakte, unabhängig von der Einstellung des Benutzers für die anfängliche Adressliste angezeigt haben.
Sub ShowOnlyContacts()
Dim oMsg As MailItem
Set oMsg = Application.CreateItem(olMailItem)
Dim oDialog As SelectNamesDialog
Set oDialog = Application.Session.GetSelectNamesDialog
Dim oContacts As Folder
Set oContacts = _
Application.Session.GetDefaultFolder(olFolderContacts)
Dim oAL As AddressList
For Each oAL In Application.Session.AddressLists
If oAL.GetContactsFolder = oContacts Then
Exit For
End If
Next
With oDialog
.InitialAddressList = oAL
.ShowOnlyInitialAddressList = True
.Recipients = oMsg.Recipients
If .Display Then
'Recipients Resolved
End If
End With
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.