Compartir a través de


Método DistListItem.GetMember (Outlook)

Devuelve un objeto Recipient que representa a un miembro de una lista de distribución.

Sintaxis

expresión. GetMember (Índice)

Expresión Variable que representa un objeto DistListItem .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Index Obligatorio Long Número de índice del miembro que se va a recuperar.

Valor devuelto

Un objeto Recipient que representa al miembro especificado.

Ejemplo:

En este ejemplo de Microsoft Visual Basic para Aplicaciones (VBA), se buscan todas las listas de distribución de la carpeta Contactos predeterminada y se determina si contienen el usuario actual.

Sub DisplayYourDLNames() 
 
 Dim myNameSpace As Outlook.NameSpace 
 
 Dim myFolder As Outlook.Folder 
 
 Dim myDistList As Outlook.DistListItem 
 
 Dim myFolderItems As Outlook.Items 
 
 Dim x As Integer 
 
 Dim y As Integer 
 
 Dim iCount As Integer 
 
 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 
 Set myFolder = myNameSpace.GetDefaultFolder(olFolderContacts) 
 
 Set myFolderItems = myFolder.Items 
 
 iCount = myFolderItems.Count 
 
 For x = 1 To iCount 
 
 If TypeName(myFolderItems.Item(x)) = "DistListItem" Then 
 
 Set myDistList = myFolderItems.Item(x) 
 
 For y = 1 To myDistList.MemberCount 
 
 If myDistList.GetMember(y).Name = myNameSpace.CurrentUser.Name Then 
 
 MsgBox "Your are a member of " & myDistList.DLName 
 
 End If 
 
 Next y 
 
 End If 
 
 Next x 
 
End Sub

Consulte también

Objeto DistListItem

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.