Objeto SelectNamesDialog (Outlook)
Exibe a caixa de diálogo Selecionar Nomes para o usuário selecionar entradas em uma ou mais listas de endereços e retorna as entradas selecionadas no objeto de conjunto especificado pela propriedade SelectNamesDialog.Recipients.
Você pode criar uma instância do objeto SelectNamesDialog chamando Getselectnamesdialog.
A caixa de diálogo exibida pelo Display é semelhante à caixa de diálogo Selecionar nomes na interface de usuário do Outlook. Ele observa as configurações de tamanho e a posição da caixa de diálogo Selecionar nomes interna. No entanto, seu estado padrão não mostrar Destinatários da mensagem acima para, Cc e Cco caixas de edição. Para obter mais informações sobre como usar o objeto SelectNamesDialog para exibir a caixa de diálogo Selecionar Nomes , confira Exibir Nomes do Catálogo de Endereços.
O exemplo de código a seguir mostra como usar o objeto SelectNamesDialog para exibir as entradas da pasta Contatos em uma caixa de diálogo que se parece com a caixa de diálogo Selecionar nomes na interface de usuário do 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
Referência de modelo de objeto do Outlook
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.