DistListItem.MemberCount プロパティ (Outlook)
長い 配布リストのメンバーの数を示す値を返します。 読み取り専用です。
構文
式。 MemberCount
式DistListItem オブジェクトを表す変数。
注釈
返される値は、配布リストのメンバーを含む配布リストのすべてのメンバーを表します。 各メンバー配布リストは、1 つのメンバーとして数えられます。 つまり、 membercount プロパティ は、配布リスト内の受信者とメンバー配布リスト内の受信者の合計ではありません。 たとえば、配布リストには、10 人の受信者と 1 つの配布リストを含む 15 人が含まれています、 membercount プロパティ は 11 を返します。
例
次の VBA の例は、既定の連絡先フォルダーを 1 つずつ処理して、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 のサポートおよびフィードバックを参照してください。