SelectNamesDialog.Display 方法 (Outlook)

显示 "选择姓名" 对话框。

语法

expression。 Display

表达 一个代表 SelectNamesDialog 对象的变量。

返回值

一个 Boolean值， 如果用户单击 确定，和 假 如果用户单击 取消或关闭图标 。

备注

当显示 选择姓名对话框中， 显示 使用以前的位置和大小 (由顶部、 左侧、 宽度和高度) 对话框。

"选择名称" 对话框是一个模式对话框，这意味着在用户单击 "确定"、 "取消" 或"关闭"图标之前代码执行将一直暂停。

您应该对错误条件（包括内存不足或者打开了其他消息框或对话框）进行检测。

示例

以下代码示例说明了如何创建邮件项目，允许用户在“选择名称”对话框中从 Exchange 全球通讯簿中选择收件人；如果用户选择了可以完全解析的收件人，则发送邮件项目。

Sub SelectRecipients() 
 Dim oMsg As MailItem 
 Set oMsg = Application.CreateItem(olMailItem) 
 Dim oDialog As SelectNamesDialog 
 Set oDialog = Application.Session.GetSelectNamesDialog 
 With oDialog 
 .InitialAddressList = _ 
 Application.Session.GetGlobalAddressList 
 .Recipients = oMsg.Recipients 
 If .Display Then 
 'Recipients Resolved 
 oMsg.Subject = "Hello" 
 oMsg.Send 
 End If 
 End With 
End Sub

另请参阅

SelectNamesDialog 对象

支持和反馈

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