Método DistListItem.AddMembers (Outlook)
Adiciona novos membros a uma lista de distribuição.
Sintaxe
expression. AddMembers( _Recipients_ )
Expressão Uma variável que representa um objeto DistListItem .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Destinatários | Obrigatório | Recipients | Os membros a serem adicionados à lista de distribuição. |
Exemplo
Este Microsoft exemplo Visual Basic for Applications (VBA) cria uma nova lista de distribuição e adiciona o usuário atual e 'Dan Wilson' à lista. Se o destinatário especificado não for válido, o método AddMember falhará. Portanto, para executar esse exemplo, substitua 'Dan Wilson' por um nome válido do destinatário.
Sub AddNewMembers()
Dim myNameSpace As Outlook.NameSpace
Dim myDistList As Outlook.DistListItem
Dim myTempItem As Outlook.MailItem
Dim myRecipients As Outlook.Recipients
Set myNameSpace = Application.GetNamespace("MAPI
Set myDistList = Application.CreateItem(olDistributionListItem
Set myTempItem = Application.CreateItem(olMailItem
Set myRecipients = myTempItem.Recipients
myDistList.DLName = _
InputBox("Enter the name of the new distribution list
myRecipients.Add myNameSpace.CurrentUser.Name
myRecipients.Add "Dan Wilson
myRecipients.ResolveAll
myDistList.AddMembers myRecipients
myDistList.Save
myDistList.Display
End Sub
Confira também
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.