會傳回指出通訊群組清單中成員數目的 Long。 唯讀。
語法
expression。 MemberCount
詞 一個代表 DistListItem 物件的變數。
註解
該傳回值代表此通訊群組清單中的所有成員，包括成員通訊群組清單。 每個成員通訊群組清單將做為單個成員計算。 也就是說，MemberCount 並非通訊群組清單中與成員通訊群組清單中的收件者之和。 例如，如果通訊群組清單包括 10 個收件者，還有一個包括 15 個收件者的通訊群組清單，那麼 MemberCount 將傳回 11。
範例
這個 Microsoft Visual Basic for Applications 範例會逐步檢查預設的 [連絡人] 資料夾，如果發現成員數多於 20 的通訊群組清單，就會顯示該項目。
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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。