Hoppa till huvudinnehåll

Hur räknar jag medlemmar i distributionslistan i Outlook?

Författare: Siluvia Senast ändrad: 2024-12-31

Att hantera kontaktgrupper i Outlook kan ibland vara utmanande, särskilt när du behöver veta antalet medlemmar i en distributionslista. Outlook erbjuder inte en inbyggd funktion för detta, vilket gör att många användare är osäker på hur man snabbt får en korrekt räkning. I den här artikeln kommer vi att utforska två metoder för att lösa det här problemet: att använda VBA för en manuell lösning och den mycket enklare, snabbare Kutools for Outlook-metoden. Om du letar efter användarvänlighet och effektivitet kommer den andra metoden verkligen att sticka ut.

Räkna medlemmar i distributionslistan som använder VBA-kod (Manuellt och tråkigt)

Räkna direkt kontaktgruppmedlemmar med Kutools for Outlook 👍 (Snabbt och enkelt)


Räkna medlemmar i distributionslistan som använder VBA-kod

För användare som är bekväma med tekniska inställningar, VBA (Visual Basic for Applications) ger ett sätt att räkna medlemmar i en distributionslista. Även om den här metoden är effektiv kräver den en viss ansträngning att konfigurera och köra.

Steg 1: Skapa och spara VBA-kod

1. Tryck andra + F11 för att starta Microsoft Visual Basic for Applications-fönstret.

2. klick Insert > Modulerna i verktygsfältet.

skärmdumpen av steget om att räkna medlemmar i distributionslistan i Outlook med VBA-kod 1

3. Kopiera och klistra in följande VBA-kod i VbaProject fönster.

VBA: Räkna medlemmar i distributionslistan i 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. Klicka på ikonen Spara och stäng sedan VBA-redigeraren.

Steg 2: Lägg till en knapp för makrot i verktygsfältet Snabbåtkomst

1. Navigera till Personer or Kontakt i Outlook-navigeringsfönstret för att växla till Kontakt/Människor Visa.

2. Högerklicka på Snabbåtkomstverktygsfält och klicka sedan på Anpassa snabbåtkomstverktygsfältet i högerklickmenyn.

skärmdumpen av steget om att räkna medlemmar i distributionslistan i Outlook med VBA-kod 2

3. I Outlook-Val dialogrutan måste du:

1). Välj Makron i Välj kommandon från rullgardinsmeny

2). Välj makrot du skapade i Separator lådan och klicka Lägg till, Klicka sedan OK.

skärmdumpen av steget om att räkna medlemmar i distributionslistan i Outlook med VBA-kod 3

Steg 3: Kör VBA-koden

Efter att ha lagt till knappen för makrot på Snabbåtkomstverktygsfält, nu kan du köra VBA-koden för att räkna distributionslistans medlemmar.

1. Välj distributionslistan du vill analysera och klicka sedan på makroknappen på Snabbåtkomstverktygsfält.

skärmdumpen av steget om att räkna medlemmar i distributionslistan i Outlook med VBA-kod 4

2. En uppmaning visar antalet medlemmar i distributionslistan.

skärmdumpen av steget om att räkna medlemmar i distributionslistan i Outlook med VBA-kod 5


🌟 Dela kontaktgrupper enkelt i Outlook 🌟

🚀 Organisera snabbt dina kontaktgrupper i Outlook! Med Kutools för Outlook, kan du dela upp stora grupper i mindre, mer hanterbara grupper med bara några klick.

✨ Så fungerar det:

  1. Växla till vyn Kontakter och välj gruppen som ska delas.
  2. Klicka Kutools Plus > Kontaktgrupp > Dela upp till flera kontaktgrupper.
  3. Välj kontakterna för att flytta till en ny grupp och namnge gruppen.
  4. Klicka OK och låt Kutools sköta resten!
Funktionen Dela upp till flera kontaktgrupper

🌟 Prova Kutools för Outlook nu


Räkna direkt kontaktgruppmedlemmar med Kutools for Outlook 👍

Om du letar efter en snabbare, enklare och mer intuitiv lösning, Kutools för Outlook är det perfekta verktyget. Dess Information funktionen ger en omedelbar räkning av medlemmar i distributionslistan med bara ett enda klick. Denna metod eliminerar behovet av tekniska inställningar och erbjuder ytterligare information om gruppen, vilket gör den till ett måste för Outlook-användare.

Lås upp ultimat e-posteffektivitet med Kutools för Outlook! Tillträde 70 kraftfulla funktioner helt gratis, alltid. Ladda ner gratisversionen nu!

1. När du har öppnat kontaktgruppen du vill analysera klickar du på Kutools > Information.

skärmdumpen av steget om att räkna medlemmar i distributionslistan i Outlook med Kutools metod 6

2. Omedelbart kan du se totalt antal medlemmar, Skapelsedagenoch senaste ändringsdatum.

skärmdumpen av steget om att räkna medlemmar i distributionslistan i Outlook med Kutools metod 7

Varför är Kutools-metoden överlägsen?

Även om VBA-metoden är funktionell, är den opraktisk för de flesta användare på grund av dess komplexitet och flerstegsinställning. Kutools for Outlook, å andra sidan, erbjuder oöverträffad bekvämlighet. Här är varför det är det bättre valet:

  • Snabbinställning: Inget behov av att navigera i menyer eller skriva kod. Installera Kutools, och du är redo att gå.
  • Lösning med ett klick: Spara tid och ansträngning med omedelbara resultat.
  • Felfri: Till skillnad från VBA finns det ingen risk för fel i kodning eller konfiguration. Kutools säkerställer 100% noggrannhet varje gång.
  • Omfattande information: Gå utöver bara medlemsantalet med ytterligare data som VBA inte kan tillhandahålla.
  • Professionell produktivitet: Idealisk för användare som behöver hantera kontaktgrupper effektivt utan störningar.
Notera: För att tillämpa Information verktyget för Kutools för Outlook, för det första bör du ladda ner och installera Kutools för Outlook.

Bästa kontorsproduktivitetsverktyg

Nyheter: Kutools för Outlook lanseras Gratis version!

Upplev de helt nya Kutools för Outlook GRATIS version med 70+ otroliga funktioner, din att använda FÖR EVIGT! Klicka för att ladda ner nu!

🤖 Kutools AI : Använder avancerad AI-teknik för att hantera e-postmeddelanden utan ansträngning, inklusive att svara, sammanfatta, optimera, utöka, översätta och skriva e-postmeddelanden.

📧 Email Automation: Autosvar (tillgängligt för POP och IMAP)  /  Schemalägg Skicka e-post  /  Auto CC/BCC enligt regler när du skickar e-post  /  Automatisk vidarebefordran (avancerade regler)   /  Lägg automatiskt till hälsning   /  Dela automatiskt e-postmeddelanden med flera mottagare i individuella meddelanden ...

📨 Email Management: Återkalla e-postmeddelanden  /  Blockera bluff-e-postmeddelanden av ämnen och andra  /  Ta bort duplicerade e-postmeddelanden  /  Avancerad Sökning  /  Konsolidera mappar ...

📁 Bilagor ProBatch Spara  /  Batch lossa  /  Batchkomprimera  /  Automatisk sparning   /  Auto Lossa  /  Automatisk komprimering ...

🌟 Gränssnittsmagi: 😊 Fler vackra och coola emojis   /  Påminn dig när viktiga mejl kommer  /  Minimera Outlook istället för att stänga ...

👍 Underverk med ett klick: Svara alla med inkommande bilagor  /   E-postmeddelanden mot nätfiske  /  🕘Visa avsändarens tidszon ...

👩🏼‍🤝‍👩🏻 Kontakter och kalender: Lägg till kontakter i grupp från valda e-postmeddelanden  /  Dela upp en kontaktgrupp till individuella grupper  /  Ta bort påminnelser om födelsedag ...

Lås upp Kutools för Outlook omedelbart med ett enda klick—permanent gratis. Vänta inte, ladda ner nu och öka din effektivitet!

kutools för Outlook-funktioner1 kutools för Outlook-funktioner2