Kuinka laskea merkittyjen viestien määrä Outlookissa?
Outlookissa voit merkitä viestit, yhteystiedot tai tehtävät tehdäksesi niistä erinomaisia, mutta joskus sinun on laskettava Outlookissa merkittyjen kohteiden määrä. Kuinka voit käsitellä tätä tehtävää Outlookissa?
Laske merkittyjen viestien määrä yhdessä tilissä hakukansioiden avulla
a name="a1"> Laske merkittyjen viestien määrä yhdessä tilissä hakukansioiden avulla
Voit laskea Outlook-tilin merkittyjen sähköpostien määrän Etsi kansiot ominaisuus voi auttaa sinua, toimi seuraavasti:
1. Oikealla painikkeella Etsi kansiot Sähköpostitilisi alla ja valitse sitten Uusi hakukansio, katso kuvakaappaus:
2. Sitten eräs Uusi hakukansio valintaikkuna avautuu, napsauta Posti merkitty seurantaa varten vaihtoehto Sähköpostin lukeminen osio, katso kuvakaappaus:
3. Napsauta sitten OK, ja kaikki merkityt viestit kopioidaan kansioon Seurantaa varten kansio, ja merkittyjen sähköpostien kokonaismäärä näytetään seuraavan kuvakaappauksen mukaisesti:
a name="a2"> Laske merkittyjen viestien / yhteystietojen / tehtävien määrä erikseen kaikilla VBA-koodia käyttävillä tileillä
Jos haluat laskea erikseen kaikkien merkittyjen kohteiden, kuten sähköpostien, yhteystietojen ja tehtävien määrän Outlookissa, seuraava VBA-koodi voi tehdä sinulle palveluksen.
1. Pidä painettuna ALT + F11 avaimet avaamaan Microsoft Visual Basic for Applications ikkunassa.
2. Napsauta sitten liite > Moduulit, kopioi ja liitä alla oleva koodi avautuvaan tyhjään moduuliin, katso kuvakaappaus:
VBA-koodi: Laske merkittyjen kertojen määrä Outlookissa:
Dim GSeparateCount, GMailCount, GContactCount, GTaskCount As Long
Sub CountFlaggedItems()
Dim xStore As Outlook.Store
Dim xTotalCount As Long
Dim xPrompt As String
Dim xFolder As Folder
Dim i, k As Integer
On Error Resume Next
xTotalCount = 0
GMailCount = 0
GContactCount = 0
GTaskCount = 0
For Each xStore In Application.Session.Stores
For Each xFolder In xStore.GetRootFolder.Folders
Call ProcessFolders(xFolder)
Next
Next
xTotalCount = GMailCount + GContactCount + GTaskCount
xPrompt = xTotalCount & " items have been flagged, as follows: " & Chr(10) & Chr(10) & "Emails: " & GMailCount & Chr(10) & "Contacts: " & GContactCount & Chr(10) & "Tasks: " & GTaskCount
MsgBox xPrompt, vbInformation + vbOKOnly, "Kutools for Outlook"
End Sub
Sub ProcessFolders(ByVal CurFolder As Outlook.Folder)
Dim xSubfolder As Outlook.Folder
Dim xItem As Object
Dim i, k As Integer
On Error Resume Next
For i = CurFolder.Items.Count To 1 Step -1
Set xItem = CurFolder.Items.item(i)
Select Case xItem.Class
Case olMail, olPost, olSharing
If xItem.IsMarkedAsTask = True Then
GMailCount = GMailCount + 1
End If
Case olContact, olDistList
If xItem.IsMarkedAsTask = True Then
GContactCount = GContactCount + 1
End If
Case olTask
If CurFolder.DefaultItemType = olTaskItem Then
GTaskCount = GTaskCount + 1
End If
End Select
Next i
If CurFolder.Folders.Count > 0 Then
For k = CurFolder.Folders.Count To 1 Step -1
Set xSubfolder = CurFolder.Folders.item(k)
Call ProcessFolders(xSubfolder)
Next k
End If
End Sub
3. Paina sitten F5 -näppäintä tämän koodin suorittamiseksi, ja näkyviin tulee kehoteruutu, joka kertoo kaikkien merkittyjen kohteiden kokonaismäärän alla olevan kuvakaappauksen mukaisesti:
Laske tämän päivän, eilen, luettujen, lukemattomien kohteiden lukumäärä, kokonaismäärä ... Outlookissa Kanssa Kutools Outlookilleon voimakas tilastotiedot -ominaisuuden avulla voit saada kohteiden määrän päivämäärän, valittujen kohteiden, luettujen, lukemattomien ja niin edelleen tarpeen mukaan.  Kutools Outlookille: yli 70 kätevää ja ilmaista Outlook-apuohjelmaa, lataa ilmainen versio nyt . |
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 ...
