SelectNamesDialog.ShowOnlyInitialAddressList Property (Outlook)

Returns or sets a Boolean that determines if the AddressList represented by SelectNamesDialog.InitialAddressList is the only AddressList available in the drop-down list for Address Book in the Select Names dialog box. Read/write.

Version Information

Version Added: Outlook 2007

Syntax

expression .ShowOnlyInitialAddressList

expression A variable that represents a SelectNamesDialog object.

Remarks

The default value of this property is False, meaning that all address lists are displayed. To restrict the drop-down list for Address Book to the one indicated by InitialAddressList, set ShowOnlyInitialAddressList to True.

If you do not set the InitialAddressList property and then set ShowOnlyInitialAddressList to True, then the AddressList with AddressList.IsInitialAddressList equal to True will be the only address list available in the drop-down list for Address Book.

Example

The following code sample shows how to use IsInitialAddressList and ShowOnlyInitialAddressList to have the Select Names dialog box always display only the address list in the default Contacts folder, regardless of the user's setting for the initial address list.

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

See Also

Concepts

SelectNamesDialog Object

SelectNamesDialog Object Members