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 のサポートおよびフィードバックを参照してください。