Hoe telt u het aantal leden in distributielijsten in Outlook?

Het beheren van contactgroepen in Outlook kan soms lastig zijn, vooral als u snel het exacte aantal leden in een distributielijst wilt weten. Helaas biedt Outlook hiervoor geen ingebouwde functie, waardoor veel gebruikers vastlopen bij het verkrijgen van een nauwkeurig cijfer. In dit artikel bespreken we twee oplossingen: een handmatige methode met VBA en de veel eenvoudigere, snellere aanpak met Kutools voor Outlook. Als u kiest voor gebruiksgemak en efficiëntie, dan is de tweede optie duidelijk de winnaar.

Tel leden van distributielijsten met VBA-code(Handmatig en vervelend)

• Stap 1: Maak en bewaar VBA-code
• Stap 2: Voeg een knop voor de macro toe aan de Snelle Toegangswerkbalk
• Stap 3: Voer de VBA-code uit

Tel direct leden van Contactgroep met Kutools voor Outlook 👍(Snel en moeiteloos)

---

Tel leden van distributielijsten met VBA-code

Voor gebruikers met affiniteit met technische instellingen biedt VBA (Visual Basic for Applications) een manier om leden in een distributielijst te tellen. Hoewel deze methode effectief is, vraagt ze enige inspanning om in te stellen en uit te voeren.

Stap 1: Maak en bewaar VBA-code

1. Druk op "Alt" + "F11" om het Microsoft Visual Basic for Applications-venster te openen.

2. Klik op 'Invoegen' > 'Module' in de werkbalk.

3. Kopieer en plak daarna de volgende VBA-code in het venster van het VbaProject.

VBA: Tel leden van distributielijsten in Outlook

Sub CountDLMembers()
    Dim oOL As Outlook.Application
    Dim oSelection As Outlook.Selection
    Dim oItem As Object
    Dim olDL As Outlook.DistListItem
    Dim Result As String
    Set oOL = Outlook.Application
    'Check and get the selected Contact Group
    Select Case TypeName(oOL.ActiveWindow)
        Case "Explorer"
            Set oSelection = oOL.ActiveExplorer.Selection
            If oSelection.Count > 0 Then
                Set oItem = oSelection.Item(1)
            Else
                Result = MsgBox("No item selected. " & _
                            "Please select a Contact Group first.", _
                            vbCritical, "CountDLMembers")
                Exit Sub
            End If
        Case "Inspector"
            Set oItem = oOL.ActiveInspector.CurrentItem
        Case Else
            Result = MsgBox("Unsupported Window type." & _
                        vbNewLine & "Please make a selection " & _
                        "in the Calendar or open a Contact Group first.", _
                        vbCritical, "CountDLMembers")
            Exit Sub
    End Select
    If oItem.Class = Outlook.olDistributionList Then
        'Display the member count
        Set olDL = oItem
        Result = MsgBox("The Contact Group '" & olDL.DLName & "' contains " & olDL.MemberCount & " members.", vbInformation, "CountDLMembers")
    Else
        'Selected item isn't a Contact Group item
        Result = MsgBox("No Contact Group item selected. " & _
                    "Please make a selection first.", _
                    vbCritical, "CountDLMembers")
        Exit Sub
    End If
    'Cleanup
    Set oOL = Nothing
    Set olDL = Nothing
End Sub

4. Klik op het pictogram 'Opslaan' en sluit de VBA-editor.

Stap 2: Voeg een knop voor de macro toe aan de Snelle Toegangswerkbalk

1. Navigeer naar 'Personen' of 'Contacten' in de Outlook-navigatie om over te schakelen naar de Contacten-/Personenweergave.

2. Klik met de rechtermuisknop op de Snelle Toegangswerkbalk en kies vervolgens ‘Snelle Toegangswerkbalk aanpassen’ in het contextmenu.

3. In het dialoogvenster 'Outlook-opties' doet u het volgende:

• 1). Selecteer 'Macro's' in de keuzelijst 'Kies opdrachten uit'.
• 2). Selecteer de macro die u hebt gemaakt in de lijst, klik op 'Toevoegen' en vervolgens op 'OK'.

Stap 3: Voer de VBA-code uit

Nadat u de macroknop aan de Snelle Toegangswerkbalk hebt toegevoegd, kunt u de VBA-code direct uitvoeren om de leden van de distributielijst te tellen.

1. Selecteer de distributielijst die u wilt analyseren en klik op de macroknop in de Snelle Toegangswerkbalk.

2. Er verschijnt een melding met het aantal leden in de distributielijst.

---

---

Tel direct leden van Contactgroep met Kutools voor Outlook 👍

Als u op zoek bent naar een snellere, eenvoudigere en intuïtievere oplossing, is **Kutools voor Outlook** het perfecte hulpmiddel. Met één klik toont de functie **‘Informatie’** direct het aantal leden van een distributielijst — zonder technische instellingen en met extra groepsdetails. Onmisbaar voor elke Outlook-gebruiker!

1. Nadat u de contactgroep die u wilt analyseren heeft geopend, klikt u op **Kutools** > **Informatie**.

2. U ziet direct het totale aantal leden, de aanmaakdatum en de datum van laatste wijziging.