NameSpace.CreateRecipient 方法 (Outlook)
创建 收件人 对象。
语法
expression。 CreateRecipient( _RecipientName_ )
表达 一个代表 NameSpace 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| RecipientName | 必需 | 字符串 | 收件人的姓名;它可以是表示收件人的显示名称、别名或完整 SMTP 电子邮件地址的字符串。 |
返回值
一个代表新收件人的 Recipient 对象。
备注
此方法最常用于创建使用 GetSharedDefaultFolder 方法时，使用的 收件人 对象，例如，以打开代理者的文件夹。 它还可以用于验证给定的名称对照通讯簿。
示例
此 Visual Basic for Applications (VBA) 示例使用 GetSharedDefaultFolder 方法来解析表示 Dan Wilson，该 收件人 对象，并返回陶建明的共享的默认 日历文件夹。 若要运行此示例，使用有效的收件人姓名替换 Dan Wilson，并确保日历已共享且您有查看该日历的权限。
Sub ResolveName()
Dim myNamespace As Outlook.NameSpace
Dim myRecipient As Outlook.Recipient
Dim CalendarFolder As Outlook.Folder
Set myNamespace = Application.GetNamespace("MAPI")
Set myRecipient = myNamespace.CreateRecipient("Dan Wilson")
myRecipient.Resolve
If myRecipient.Resolved Then
Call ShowCalendar(myNamespace, myRecipient)
End If
End Sub
Sub ShowCalendar(myNamespace, myRecipient)
Dim CalendarFolder As Folder
Set CalendarFolder = _
myNamespace.GetSharedDefaultFolder _
(myRecipient, olFolderCalendar)
CalendarFolder.Display
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。