hvordan å telle distribusjonsliste medlemmer i Outlook?
I Outlook, er det ingen funksjon for deg å telle distribusjonslisten medlemmer direkte. Hvis du har en distribusjonsliste med store mengder e-postadresser, hvordan finne ut at hvor mange medlemmer er med i denne gruppen? Med denne artikkelen, vil du lære å telle distribusjonsliste medlemmer med å bruke VBA-kode.
2013.
Count distribusjonsliste medlemmer i Outlook med VBA-kode
Du kan bruke VBA-kode for å telle distribusjonslisten medlemmer som følger.
Lag og lagre en VBA-kode
1. Åpne Microsoft Visual Basic for Applications vindu med å trykke Alt + F11 tastene på tastaturet samtidig.
2. Klikk Sett > Modul. Se skjermbilde:
tre. Deretter kopiere og lime inn følgende VBA kode i VbaProject vinduet
VBA. Count distribusjonsliste medlemmer i Outlook
Sub CountDLMembers () Dim OOL Som Outlook.Application Dim oSelection Som Outlook.Selection Dim oItem As Object Dim olDL As Outlook.DistListItem Dim Resultat As String Set OOL = Outlook.Application 'Kontroller og få valgt kontaktgruppe Select sak Typename (oOL.ActiveWindow) veske "Explorer" Set oSelection = oOL.ActiveExplorer.Selection Hvis oSelection.Count > 0 Then Sett oItem = oSelection.Item (1) Else Resultat = MsgBox ("No element valgt." &Amp; _ ". Velg en kontaktgruppe først", _ vbCritical, "CountDLMembers") Exit Sub End If case "Inspector" Still oItem = oOL.ActiveInspector.CurrentItem sak Else Resultat = MsgBox ("Unsupported Window type." & _ vbNewLine & "Gi meg en liste" & _ ". i kalenderen eller åpne en kontaktgruppe først", _ vbCritical , "CountDLMembers") Exit Sub End Select Hvis oItem.Class = Outlook.olDistributionList Then 'vise medlem telle Sett olDL = oItem Resultat = MsgBox ("Kontaktgruppen'" & olDL.DLName & "" inneholder "& olDL.MemberCount & ". medlemmer", vbInformation, er "CountDLMembers") Else 'Valgt element ikke en kontaktgruppe element Resultat = MsgBox ("No Kontaktgruppen elementet valgt. "&Amp; _" Vennligst gjør et valg først ", _ vbCritical," CountDLMembers ") Exit Sub End If 'Cleanup Set OOL = Ingenting Set olDL = NothingEnd Sub4 Deretter klikker du på Lagre-knappen for å lagre den
5.... Lukk Microsoft Visual Basic for Applications vinduet.
Legg til en knapp for makroen til Quick Access Toolbar
1. Gå til Kontakter eller People viser ved å klikke Kontakter eller Folk i navigasjonsruten.
2 . I Outlook 2010 og 2013, kan du høyreklikke på Quick Access Toolbar og klikk deretter Tilpass Quick Access Toolbar i høyreklikke menyen Se skjermbilde.
Merk: I Outlook 2007, kan du åpne en distribusjonsliste, . og deretter høyreklikk på Quick Access Toolbar for å velge Quick Access Toolbar i høyreklikke menyen
3. I dialogboksen Alternativer for Outlook, må du:.
1) Sørg for at du er å finne i Quick Access Toolbar delen;.
2) Velg Makroer i Velg kommandoer fra nedtrekkslisten;
3). Velg makroer i Separator boksen;
4). Klikk på knappen Legg;
5). Og til slutt klikker på OK-knappen. Se skjermbilde:
4. Deretter kan du se knappen for makro legges på Quick Access Toolbar.
Kjør VBA-kode
Etter å legge på knappen for makro på Quick Access Toolbar, nå kan du kjøre VBA-kode å telle distribusjons medlemmer av listen.
en. I Outlook 2010 og 2013, kan du bare velge en distribusjonsliste, og klikk deretter på knappen for makro på Quick Access Toolbar
. Merk: I Outlook 2007, må du åpne en distribusjonsliste, og klikk deretter på knappen for makroen på Quick Access Toolbar.
to. Så en rask boks vil komme opp for å fortelle deg hvor mange medlemmer som er med i denne distribusjonsliste. Klikk deretter på OK.
