Skip i'r prif gynnwys

Sut i gyfrif cyfanswm nifer yr e-byst sy'n dod i mewn y dydd yn Outlook?

A ydych erioed wedi cyfrif cyfanswm yr e-byst a gawsoch bob dydd? Ac a ydych chi wedi cael llond bol ar eu cyfrif fesul un â llaw heb unrhyw ddulliau effeithlon? Yn y tiwtorial hwn, rydyn ni'n darparu dau dric i chi ar gyfer cyfrif cyfanswm e-byst y dydd yn Outlook.


Cyfrif cyfanswm nifer yr e-byst sy'n dod i mewn heddiw gyda nodwedd Chwilio ar Unwaith

A dweud y gwir, mae'n eithaf hawdd chwilio pob e-bost sy'n dod i mewn heddiw i'r ffolder Mewnflwch, pob ffolder cyfrif e-bost, neu holl ffolderau'r holl gyfrifon e-bost yn Outlook, ac yna cyfrif cyfanswm y canlyniadau chwilio. Gwnewch fel a ganlyn:

Yn y bost gweld, (1) dewiswch y Mewnflwch ffolder o un cyfrif e-bost y byddwch chi'n cyfrif e-byst sy'n dod i mewn heddiw; (2) Teipiwch y meini prawf chwilio derbyniwyd: Heddiw i mewn i'r Chwilio Instant blwch, ac yna (3) nodi cwmpas chwilio yn y Cwmpas grŵp ar y Chwilio tab. Gweler y screenshot:

Ac yn awr cyfanswm yr holl ganlyniadau chwilio, mewn geiriau eraill mae cyfanswm yr e-byst sy'n dod i mewn heddiw yn cael eu harddangos yng nghornel chwith isaf Outlook fel y dangosir isod y screenshot.

Un clic i gyfrif nifer yr e-byst a ddewiswyd yn Outlook

Mae'n hawdd cael cyfanswm yr holl eitemau neu nifer yr eitemau heb eu darllen mewn ffolder Outlook. Ond sut allech chi gael nifer yr eitemau a ddewiswyd mewn ffolder yn Outlook yn gyflym? Yma, Kutools ar gyfer Rhagolwg's Cyfrif Eitemau Dethol argymhellir, a all ddangos nifer yr eitemau a ddewiswyd yn gyflym trwy un clic yn unig!


Cyfrif cyfanswm nifer yr e-byst sy'n dod i mewn heddiw gyda nodwedd Ffolder Chwilio

Bydd y dull hwn yn eich tywys i greu ffolder chwilio sy'n casglu'r holl negeseuon e-bost a dderbynnir heddiw yn awtomatig, ac yna gallwch gael cyfanswm nifer yr e-byst hyn gyda newid priodweddau'r ffolder chwilio. Gwnewch fel a ganlyn:

1. Dewiswch y cyfrif e-bost y byddwch chi'n creu ffolder chwilio ynddo ar y Pane Llywio, a chlicio Ffolder > Ffolder Chwilio Newydd. Gweler y screenshot:

2. Yn y Ffolder Chwilio Newydd deialog, dewiswch y Creu Ffolder Chwilio wedi'i deilwra opsiwn, a chliciwch ar y Dewiswch botwm. Gweler y screenshot:

3. Nawr mae'r blwch deialog Custom Search Folder yn dod allan. Enwch y ffolder chwilio newydd yn y Enw blwch.

4. Ewch ymlaen i glicio ar y Meini Prawf botwm yn y Ffolder Chwilio Custom. Nawr Yn y blwch deialog Meini Prawf Chwilio, (1) cliciwch Neges tab, (2) dewiswch dderbyniwyd oddi wrth y amser rhestr ostwng, (3) nodwch Heddiw o'r gwymplen ganlynol, ac yna (4) cliciwch y OK botwm. Gweler y screenshot:

5. Nawr mae'n dychwelyd i'r Ffolder Chwilio Custom deialog, cliciwch Pori botwm. Ac yna Yn y blwch deialog Dewis Ffolder (au), (1) gwiriwch yn unig Mewnflwch yn y Ffolderi blwch rhestr, gwirio Chwilio Is-ffolderi opsiwn, a chliciwch ar y OK botwm. Gweler y screenshot:

6. Ac yna cliciwch OK botymau yn olynol i gau'r blwch deialog Custom Search Folder a'r blwch deialog Ffolder Chwilio Newydd.

7. Cliciwch ar y dde i'r ffolder chwilio newydd a greoch chi ar hyn o bryd, ac yna dewiswch Eiddo o'r ddewislen clicio ar y dde. Gweler y screenshot:

8. Yn y dialog canlynol, gwiriwch y Dangos cyfanswm yr eitemau opsiwn, ac yna cliciwch ar y OK botwm. Gweler y screenshot:

O hyn ymlaen, bydd y copïau o'r negeseuon e-bost sy'n dod i mewn yn cael eu cadw i'r ffolder chwilio hon bob dydd. Os yw diwrnod newydd yn dod, bydd y ffolder chwilio yn dileu'r holl hen negeseuon yn awtomatig ac yn dechrau cyfrif negeseuon e-bost y dyddiau newydd.

Nodyn: Dim ond cyfanswm cyfrif e-byst a dderbynnir heddiw ym Mewnflwch un cyfrif e-bost y gall y dull hwn ei gyfrif.


Cyfrif cyfanswm nifer yr e-byst sy'n dod i mewn ar ddyddiad penodol gyda VBA

Heblaw am y dull uchod, gallwch ddefnyddio cod VBA i gyfrif cyfanswm e-byst ar ddyddiad penodol yn Outlook. Gwnewch fel a ganlyn.

1. Dewiswch y ffolder rydych chi am gyfrif cyfanswm yr e-byst sy'n dod i mewn bob dydd, ac yna agorwch y Microsoft Visual Basic ar gyfer Ceisiadau trwy wasgu Alt + F11.

2. Yna os gwelwch yn dda Mewnosod > Modiwlau i fewnosod modiwl newydd, ac yna pastio islaw cod VBA ynddo.

VBA: Cyfrif cyfanswm yr e-byst y dydd

Sub Countemailsperday()
    Dim objOutlook As Object, objnSpace As Object, objFolder As MAPIFolder
    Dim EmailCount As Integer
    Dim oDate As String
    
    oDate = InputBox("Type the date for count (format YYYY-m-d")
    Set objOutlook = CreateObject("Outlook.Application")
    Set objnSpace = objOutlook.GetNamespace("MAPI")
        On Error Resume Next
        Set objFolder = Application.ActiveExplorer.CurrentFolder
        If Err.Number <> 0 Then
        Err.Clear
        MsgBox "No such folder."
        Exit Sub
        End If
    EmailCount = objFolder.Items.Count
    MsgBox "Number of emails in the folder: " & EmailCount, , "email count"
    Dim ssitem As MailItem
    Dim dateStr As String
    Dim myItems As Outlook.Items
    Dim dict As Object
    Dim msg As String
    Set dict = CreateObject("Scripting.Dictionary")
    Set myItems = objFolder.Items
    myItems.SetColumns ("ReceivedTime")
    ' Determine date of each message:
    For Each myItem In myItems
        dateStr = GetDate(myItem.ReceivedTime)
        If dateStr = oDate Then
            If Not dict.Exists(dateStr) Then
                dict(dateStr) = 0
            End If
            dict(dateStr) = CLng(dict(dateStr)) + 1
        End If
    Next myItem
    ' Output counts per day:
    msg = ""
    For Each o In dict.Keys
        msg = msg & o & ": " & dict(o) & " items" & vbCrLf
    Next
    MsgBox msg
    Set objFolder = Nothing
    Set objnSpace = Nothing
    Set objOutlook = Nothing
End Sub
Function GetDate(dt As Date) As String
    GetDate = Year(dt) & "-" & Month(dt) & "-" & Day(dt)
End Function

3. Ar ôl pasio'r cod VBA, cliciwch Run botwm.

4. Yna nodwch y dyddiad penodedig rydych chi am gyfrif cyfanswm yr e-byst sy'n dod i mewn yn y blwch deialog popio allan, ac yna cliciwch OK. Gweler y screenshot:

5. Mae blwch deialog yn annog i ddangos cyfanswm nifer yr e-byst yn y ffolder a ddewiswyd, cliciwch y OK botwm. Ac yn yr ail flwch deialog popio allan, fe gewch gyfanswm y negeseuon e-bost a dderbynnir heddiw. Gweler sgrinluniau:

Nodiadau:
(1) Dim ond cyfanswm yr holl e-bost a dderbynnir ar y dyddiad penodedig y gall y VBA hwn ei gyfrif yn y ffolder a ddewiswyd;
(2) Mae'r cod VBA hwn yn gweithio'n dda yn Outlook 2010, 2013, a 2016.


Cyfrif cyfanswm nifer yr e-byst sy'n dod i mewn y dydd gyda Kutools ar gyfer Outlook

Os oes gennych chi Kutools ar gyfer Outlook wedi'i osod, gallwch chi gymhwyso ei nodwedd Ystadegau i gyfrif yn hawdd gyfanswm nifer y negeseuon e-bost a dderbynnir bob dydd mewn mis. Gwnewch fel a ganlyn os gwelwch yn dda:

Kutools ar gyfer Rhagolwg: Pecyn cymorth Outlook Ultimate gyda dros 100 o offer defnyddiol. Rhowch gynnig arni AM DDIM am 60 diwrnod, dim cyfyngiadau, dim pryderon!   Read More ...   Dechreuwch Treial Am Ddim Nawr!

1. Cliciwch Kutools Byd Gwaith > Ystadegau. Gweler y screenshot:

2. Nawr bod y blwch deialog Ystadegau yn dod allan, dewiswch y ffolderau penodedig y byddwch chi'n cyfrif e-byst ynddynt, nodwch yr ystod dyddiad y byddwch chi'n cyfrif e-byst oddi mewn, a cliciwch y OK botwm. Gweler y screenshot:

3. Yn yr ail flwch deialog Ystadegol, ewch i'r Dyddiau'r Mis tab neu Dyddiau'r Wythnos tab, gallwch weld cyfanswm nifer yr e-byst a dderbyniwyd ar bob dyddiad. Gweler y screenshot:
Btw, gallwch hefyd gael cyfanswm y negeseuon e-bost a dderbyniwyd heddiw / ddoe ym mhob ffolder Mewnflwch o'r holl gyfrifon e-bost ar y Crynodeb tab.


Demo: Cyfrifwch gyfanswm nifer y negeseuon e-bost sy'n dod i mewn y dydd gyda Kutools ar gyfer Outlook


Tip: Yn y Fideo hwn, Kutools tab yn cael ei ychwanegu gan Kutools ar gyfer Rhagolwg. Os oes ei angen arnoch, cliciwch yma i gael treial am ddim 60 diwrnod heb gyfyngiad!


Erthyglau cysylltiedig:


Offer Cynhyrchiant Swyddfa Gorau

Kutools ar gyfer Rhagolwg - Dros 100 o Nodweddion Pwerus i Werthu Eich Outlook

🤖 Cynorthwy-ydd Post AI: E-byst pro ar unwaith gyda hud AI - un clic i atebion athrylith, tôn berffaith, meistrolaeth amlieithog. Trawsnewid e-bostio yn ddiymdrech! ...

📧 E-bostio Automation: Allan o'r Swyddfa (Ar gael ar gyfer POP ac IMAP)  /  Amserlen Anfon E-byst  /  Auto CC/BCC gan Reolau Wrth Anfon E-bost  /  Awto Ymlaen (Rheolau Uwch)   /  Auto Ychwanegu Cyfarchiad   /  Rhannwch E-byst Aml-Dderbynnydd yn Negeseuon Unigol yn Awtomatig ...

📨 Rheoli E-bost: Dwyn i gof E-byst yn Hawdd  /  Rhwystro E-byst Sgam gan Bynciau ac Eraill  /  Dileu E-byst Dyblyg  /  Chwilio Manwl  /  Cydgrynhoi Ffolderi ...

📁 Ymlyniadau ProArbed Swp  /  Swp Datgysylltu  /  Cywasgu Swp  /  Auto Achub   /  Datgysylltiad Auto  /  Cywasgiad Auto ...

🌟 Rhyngwyneb Hud: 😊Mwy o Emojis Pretty a Cŵl   /  Rhowch hwb i'ch Cynhyrchiant Outlook gyda Golygfeydd Tabbed  /  Lleihau Outlook Yn lle Cau ...

???? Rhyfeddodau un clic: Ateb Pawb ag Ymlyniadau Dod i Mewn  /   E-byst Gwrth-Gwe-rwydo  /  🕘Dangos Parth Amser yr Anfonwr ...

👩🏼‍🤝‍👩🏻 Cysylltiadau a Chalendr: Swp Ychwanegu Cysylltiadau O E-byst Dethol  /  Rhannwch Grŵp Cyswllt i Grwpiau Unigol  /  Dileu Atgoffa Pen-blwydd ...

Dros Nodweddion 100 Aros Eich Archwiliad! Cliciwch Yma i Ddarganfod Mwy.

 

 

Comments (19)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Is there a way to add the SenderName details too? Based on the above code, it counts emails by date. I was looking to count emails by sender and date.
This comment was minimized by the moderator on the site
can you do a date range? and add folders?
This comment was minimized by the moderator on the site
Hi Laura,
You can filter emails by the date range (https://www.extendoffice.com/documents/outlook/1412-outlook-search-date-range.html), and then get the total number of search results at the bottom of Outlook Navigation Pane.
This comment was minimized by the moderator on the site
will this (VBA) works under Outlook 365 ?
This comment was minimized by the moderator on the site
Hi Artur,
This VBA works well in Outlook 365 desktop program.
This comment was minimized by the moderator on the site
guys i have tried this code just now but it is not working can anyone help me . i want to count the num of email i received in my oracle folder .
This comment was minimized by the moderator on the site
Hi this vba script is most appreciated, Can anyone help me to retrieve the count from specific folder with specific time, Ex: Count from sent items from dd/mm/yyyy mm:hh till dd/mm/yyyy mm:hh
This comment was minimized by the moderator on the site
Did you find a resolution to this?
This comment was minimized by the moderator on the site
Hi guys, any idea how to make this work for a period o time? I mean, selecting a range date (from-to) and getting the result per day e.g inpunt range from June 1st to june 6th: 6/1 total 14 6/2 total 24 6/3 total 12 and so on... thanks in advance
This comment was minimized by the moderator on the site
in my case i was able to figure it out by doing it manually. like you can count it per month or per year.
if you will count if per month, just delete the day in the formula

e.g:
Function GetDate(dt As Date) As String
GetDate = Year(dt) & "-" & Month(dt)
End Function


per year:
Function GetDate(dt As Date) As String
GetDate = Year(dt)
End Function
This comment was minimized by the moderator on the site
For me the last window worked when I set both dates into the same format. I chnaged the code into this me (Ru date/time format in Windows, US - in Outlook): 1) oDate = Date 2) ' Determine date of each message: For Each MyItem In myItems dateStr = DateValue(MyItem.ReceivedTime) 3) GetDate = Day(dt) & "." & Month(dt) & "." & Year(dt)
This comment was minimized by the moderator on the site
Hi , Very useful code , but like above it does not count per day for me and last message box is empty , can anyone fix this please
This comment was minimized by the moderator on the site
VBA instuctions to be able to create a counter for emails recieves last week
This comment was minimized by the moderator on the site
very thanks i solved all what i need, very thanks again great effort
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations