Propiedad DistListItem.MemberCount (Outlook)

Devuelve un Long que indica el número de miembros de una lista de distribución. Solo lectura.

Sintaxis

expresión. MemberCount

Expresión Variable que representa un objeto DistListItem .

Comentarios

El valor devuelto representa a todos los miembros de la lista de distribución, incluidas las listas de distribución de miembros. Cada lista de distribución de miembros se cuenta como un solo miembro. Es decir, MemberCount no es una suma de los destinatarios en la lista de distribución más los destinatarios de las listas de distribución de miembros. Por ejemplo, si una lista de distribución contiene 10 destinatarios más una lista de distribución contiene a 15 destinatarios, MemberCount devolverá 11.

Ejemplo:

En este ejemplo de Microsoft Visual Basic para Aplicaciones, se desplaza por la carpeta de contactos predeterminada y, si encuentra una lista de distribución que contenga más de 20 miembros, muestra el elemento.

Sub CheckDLs() 
 
 Dim myOlFolder As Outlook.Folder 
 
 Dim myOlItems As Outlook.Items 
 
 Dim myOlDistList As Outlook.DistListItem 
 
 Dim x as Integer 
 
 
 
 Set myOlFolder = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderContacts) 
 
 Set myOlItems = myOlFolder.Items 
 
 For x = 1 To myOlItems.Count 
 
 If TypeName(myOlItems.Item(x)) = "DistListItem" Then 
 
 Set myOlDistList = myOlItems.Item(x) 
 
 If myOlDistList.MemberCount > 20 Then 
 
 MsgBox myOlDistList.DLName & " has more than 20 members." 
 
 myOlDistList.Display 
 
 End If 
 
 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.