|Access the master category list in the blink of an eye, share your color categories in a network, get a reminder service, and more.
A distribution list's member count is limited. But how do you know how many members are already on a list? The following lines of code will tell you.
Public Sub ShowMemberCount()
Dim obj As Object
Dim DL As Outlook.DistListItem
If TypeOf Application.ActiveWindow Is Outlook.Explorer Then
If Application.ActiveExplorer.Selection.Count Then
Set obj = Application.ActiveExplorer.Selection(1)
Set obj = Application.ActiveInspector.CurrentItem
If Not obj Is Nothing Then
If TypeOf obj Is Outlook.DistListItem Then
Set DL = obj
MsgBox "Name: " & DL.DLName & _
vbCrLf & "Member: " & DL.MemberCount, _
, "Member Count"