Método DistListItem.AddMembers (Outlook)
Agrega nuevos miembros a una lista de distribución.
Sintaxis
expresión. AddMembers( _Recipients_ )
Expresión Variable que representa un objeto DistListItem .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Destinatarios | Obligatorio | Recipients | Miembros que se agregarán a la lista de distribución. |
Ejemplo:
En este ejemplo de Microsoft Visual Basic para aplicaciones (VBA) se crea una lista de distribución nueva y agrega el usuario actual y "Dan Wilson" a la lista. Si el destinatario especificado no es válido, se producirá un error en el método AddMember. Por lo tanto, para ejecutar este ejemplo, reemplace a 'Dan Wilson' por un nombre de destinatario válido.
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
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.