Propriedade Recipient.Resolved (Outlook)

Retorna um Boolean que indica True se o destinatário foi validado no catálogo de endereços. Somente leitura.

Sintaxe

expression. Resolved

Expressão Uma variável que representa um objeto 'Destinatário'.

Comentários

Se houver nomes semelhantes para um destinatário em um Catálogo de Endereços, você poderá resolver o destinatário especificando o endereço de email SMTP completo do destinatário.

Exemplo

Este exemplo Visual Basic for Applications (VBA) usa o método Resolve para resolver o objeto Recipient que representa Dan Wilson e, em seguida, retorna a pasta de calendário padrão compartilhada de Dan.

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 Outlook.Folder 
 
 Set CalendarFolder = _ 
 
 myNamespace.GetSharedDefaultFolder _ 
 
 (myRecipient, olFolderCalendar) 
 
 CalendarFolder.Display 
 
End Sub

Confira também

Objeto de destinatário

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.