Outlook VBA教程:ResolveAll方法

尝试参照“通讯簿”解析Recipients集合内的所有Recipient对象。如果解析了所有对象,则返回 True;如果未全部解析,则返回 False。

expression.ResolveAll

expression   必选。该表达式返回 Recipients集合。

VBA示例

本 Visual Basic for Applications 示例使用ResolveAll方法解析所有收件人。如果不成功,则为每个未解析的收件人显示一个消息框。


Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olMailItem)
Set myRecipients = myItem.Recipients
myRecipients.Add("Aaron Con")
myRecipients.Add("Viki Parrott")
myRecipients.Add("Jeffrey Weems")
If Not myRecipients.ResolveAll Then
    For Each myRecipient In myRecipients
        If Not myRecipient.Resolved Then
            MsgBox myRecipient.Name
        End If
     Next
End If

如果使用 VBScript,则不创建Application对象,而且也不能使用命名常量。本示例说明如何使用 VBScript 执行相同任务。


Set myItem = Application.CreateItem(0)
Set myRecipients = myItem.Recipients
myRecipients.Add("Aaron Con")
myRecipients.Add("Viki Parrott")
myRecipients.Add("Jeffrey Weems")
If Not myRecipients.ResolveAll Then
    For Each myRecipient In myRecipients
        If Not myRecipient.Resolved Then
            MsgBox myRecipient.Name
        End If
     Next
End If

上页:Outlook VBA教程:Resolve方法 下页:Outlook VBA教程:Respond方法

Outlook VBA教程:ResolveAll方法:相关链接

Outlook VBA教程:Respond方法 Outlook VBA教程:Restrict方法
Outlook VBA教程:Save方法 Outlook VBA教程:SaveAs方法
Outlook VBA教程:SaveAsFile方法 Outlook VBA教程:Send方法
Outlook VBA教程:SetColumns方法 Outlook VBA教程:SetCurrentFormPage方法
Outlook VBA教程:SetIcon方法 Outlook VBA教程:ShowCategoriesDialog方法
Outlook VBA教程:ShowFormPage方法 Outlook VBA教程:ShowPane方法
Outlook VBA教程:SkipRecurrence方法 Outlook VBA教程:Snooze方法
Outlook VBA教程:Sort方法 Outlook VBA教程:Start方法
Outlook VBA教程:StartTimer方法 Outlook VBA教程:StatusReport方法
Outlook VBA教程:Stop方法 Outlook VBA教程:StopTimer方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号