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
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.