Kuinka laskea jakeluluettelon jäsenet Outlookissa?
Yhteystietoryhmien hallinta Outlookissa voi joskus olla haastavaa, varsinkin kun sinun on tiedettävä jakeluluettelon jäsenten määrä. Outlook ei tarjoa tähän sisäänrakennettua ominaisuutta, joten monet käyttäjät eivät ole varmoja siitä, kuinka nopeasti saadaan tarkka luku. Tässä artikkelissa tutkimme kahta tapaa ratkaista tämä ongelma: käyttämällä VBA:ta manuaaliseen ratkaisuun ja paljon yksinkertaisempaa, nopeampaa Kutools for Outlook -menetelmää. Jos etsit helppokäyttöisyyttä ja tehokkuutta, toinen menetelmä erottuu todella joukosta.
Laske jakeluluettelon jäsenet VBA-koodilla (Manuaalinen ja tylsä)
- Vaihe 1: Luo ja tallenna VBA-koodi
- Vaihe 2: Lisää makron painike pikatyökalupalkkiin
- Vaihe 3: Suorita VBA-koodi
Laske välittömästi yhteysryhmän jäsenet Kutools for Outlookin avulla 👍 (Nopea ja vaivaton)
Laske jakeluluettelon jäsenet VBA-koodilla
Käyttäjille, jotka ovat tottuneet käyttämään teknisiä asetuksia, "VBA" (Visual Basic for Applications) tarjoaa tavan laskea jäsenet jakeluluettelossa. Vaikka tämä menetelmä on tehokas, sen määrittäminen ja suorittaminen vaatii jonkin verran vaivaa.
Vaihe 1: Luo ja tallenna VBA-koodi
1. Paina "Alt" + "F11" käynnistääksesi Microsoft Visual Basic for Applications -ikkunan.
2. Napsauta työkalupalkissa "Lisää" > "Moduuli".
3. Kopioi ja liitä seuraava VBA-koodi "VbaProject"-ikkunaan.
VBA: Laske jakeluluettelon jäsenet Outlookissa
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. Napsauta "Tallenna"-kuvaketta ja sulje sitten VBA-editori.
Vaihe 2: Lisää makron painike pikatyökalupalkkiin
1. Siirry Outlook-navigointiruudun kohtaan "Ihmiset" tai "Yhteystiedot" vaihtaaksesi "Yhteystiedot"/"Ihmiset" -näkymään.
2. Napsauta hiiren kakkospainikkeella "Pikakäyttötyökalupalkkia" ja napsauta sitten hiiren kakkospainikkeen valikosta "Muokkaa pikatyökalupalkkia".
3. "Outlook-asetukset"-valintaikkunassa sinun on:
- 1). Valitse "Makrot" avattavasta "Valitse komennot" -luettelosta.
- 2). Valitse luettelosta luomasi makro ja napsauta "Lisää" ja napsauta sitten "OK".
Vaihe 3: Suorita VBA-koodi
Kun olet lisännyt makron painikkeen "Pikakäyttötyökalupalkkiin", voit nyt suorittaa VBA-koodin jakeluluettelon jäsenten laskemiseksi.
1. Valitse analysoitava jakeluluettelo ja napsauta sitten pikatyökalupalkin makropainiketta.
2. Kehote näyttää jakeluluettelon jäsenten määrän.
🌟 Jaa yhteysryhmät vaivattomasti Outlookissa 🌟
🚀 Järjestä yhteysryhmäsi nopeasti uudelleen Outlookissa! Kanssa Kutools Outlookille, voit jakaa suuret ryhmät pienemmiksi, helpommin hallittaviin ryhmiin muutamalla napsautuksella.
✨ Näin se toimii:
- Vaihda Yhteystiedot-näkymään ja valitse jaettava ryhmä.
- Napsauta "Kutools Plus" > "Yhteystietoryhmä" > "Jaa useisiin yhteysryhmiin".
- Valitse yhteystiedot, jotka haluat siirtyä uuteen ryhmään, ja nimeä ryhmä.
- Napsauta "OK" ja anna Kutoolsin hoitaa loput!
Laske välittömästi yhteysryhmän jäsenet Kutools for Outlookin avulla 👍
Jos etsit nopeampaa, helpompaa ja intuitiivisempaa ratkaisua, "Kutools for Outlook" on täydellinen työkalu. Sen "Tiedot"-ominaisuus tarjoaa välittömän määrän jakelulistan jäseniä yhdellä napsautuksella. Tämä menetelmä poistaa teknisten asetusten tarpeen ja tarjoaa lisätietoja ryhmästä, joten se on pakollinen Outlook-käyttäjille.
Avaa äärimmäinen sähköpostitehokkuus Kutools for Outlookin avulla! Pääsy 70 tehokkaat ominaisuudet täysin ilmaisia, ikuisesti. Lataa ilmainen versio nyt!
1. Kun olet avannut analysoitavan yhteystietoryhmän, napsauta "Kutools" > "Tiedot".
2. Välittömästi näet "jäsenten kokonaismäärän", "luontipäivämäärän" ja "viimeisen muokkauspäivän".
Miksi Kutools-menetelmä on parempi?
Vaikka VBA-lähestymistapa on toimiva, se on epäkäytännöllinen useimmille käyttäjille sen monimutkaisuuden ja monivaiheisen asennuksen vuoksi. Kutools for Outlook sen sijaan tarjoaa vertaansa vailla olevan mukavuuden. Tästä syystä se on parempi valinta:
- Nopea asennus: Ei tarvitse liikkua valikoissa tai kirjoittaa koodia. Asenna Kutools ja olet valmis lähtemään.
- Yhden napsautuksen ratkaisu: Säästä aikaa ja vaivaa välittömillä tuloksilla.
- Virheetön: Toisin kuin VBA, koodauksessa tai määrityksessä ei ole virheiden riskiä. Kutools takaa 100 % tarkkuuden joka kerta.
- Kattava tieto: Siirry jäsenmäärää pidemmälle lisätiedoilla, joita VBA ei voi tarjota.
- Ammattimainen tuottavuus: Ihanteellinen käyttäjille, joiden täytyy hallita yhteysryhmiä tehokkaasti ilman häiriöitä.
Parhaat toimiston tuottavuustyökalut
Breaking News: Kutools for Outlook julkaisee ilmaisen version!
Koe täysin uusi Kutools for Outlook ILMAINEN versio, jossa on yli 70 uskomatonta ominaisuutta, sinun käytössäsi IKUISESTI! Lataa nyt napsauttamalla!
📧 Sähköpostiautomaatio: Automaattinen vastaus (saatavilla POP:lle ja IMAP:lle) / Ajoita sähköpostien lähettäminen / Automaattinen CC/BCC sääntöjen mukaan lähetettäessä sähköpostia / Automaattinen edelleenlähetys (lisäsäännöt) / Automaattinen tervehdys / Jaa usean vastaanottajan sähköpostit automaattisesti yksittäisiksi viesteiksi ...
📨 Sähköposti Management: Muista sähköpostit / Estä huijaussähköpostit aiheiden ja muiden taholta / Poista päällekkäiset sähköpostit / Tarkennettu Haku / Yhdistä kansiot ...
📁 Liitteet Pro: Erätallennus / Erä Irrota / Eräpakkaus / Automaattinen tallennus / Automaattinen irrotus / Automaattinen pakkaus ...
🌟 Interface Magic: 😊Lisää kauniita ja siistejä emojia / Muistuttaa sinua tärkeistä sähköpostiviesteistä / Minimoi Outlook sulkemisen sijaan ...
???? Yhden napsautuksen Wonders: Vastaa kaikkiin liitteillä / Tietojenkalastelun vastaiset sähköpostit / 🕘Näytä lähettäjän aikavyöhyke ...
👩🏼🤝👩🏻 Yhteystiedot ja kalenteri: Erä Lisää yhteystietoja valituista sähköpostiviesteistä / Jaa yhteysryhmä yksittäisiin ryhmiin / Poista syntymäpäivämuistutukset ...
