Hur räknar jag medlemmar i distributionslistan i Outlook?
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)
- Steg 1: Skapa och spara VBA-kod
- Steg 2: Lägg till en knapp för makrot i verktygsfältet Snabbåtkomst
- Steg 3: Kör VBA-koden
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.
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.
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.
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.
2. En uppmaning visar antalet medlemmar i distributionslistan.
🌟 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:
- Växla till vyn Kontakter och välj gruppen som ska delas.
- Klicka Kutools Plus > Kontaktgrupp > Dela upp till flera kontaktgrupper.
- Välj kontakterna för att flytta till en ny grupp och namnge gruppen.
- Klicka OK och låt Kutools sköta resten!
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.
2. Omedelbart kan du se totalt antal medlemmar, Skapelsedagenoch senaste ändringsdatum.
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.
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!
📧 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 Pro: Batch 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 ...