SelectNamesDialog 对象 (Outlook)

  • 项目

显示 "选择姓名" 对话框，用户可使用该对话框从一个或多个地址列表中选择条目，并将选中的条目返回到由属性 SelectNamesDialog.Recipients 指定的集合对象中。

备注

您可以通过调用 NameSpace.GetSelectNamesDialog 来实例化 SelectNamesDialog 对象的一个实例。

对话框，通过 SelectNamesDialog.Display 显示为类似于 Outlook 用户界面中的 选择姓名对话框。 它遵循内置 选择姓名对话框的大小和位置设置。 但是，它的默认状态不显示 邮件收件人上方 到、 抄送，和 密件抄送编辑框。 有关使用 SelectNamesDialog 对象显示“ 选择姓名 ”对话框的详细信息，请参阅 显示通讯簿中的名称。

示例

下面的代码示例演示如何使用 SelectNamesDialog 对象来显示对话框类似于 Outlook 用户界面中的 选择姓名对话框中的联系人文件夹中的项。

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

方法

名称
Display
SetDefaultDisplayMode

属性

名称
AllowMultipleSelection
应用程序
BccLabel
Caption
CcLabel
类
ForceResolution
InitialAddressList
NumberOfRecipientSelectors
Parent
收件人
Session
ShowOnlyInitialAddressList
ToLabel

另请参阅

Outlook 对象模型引用

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。