Outlook’ta bir günde gelen e-postaların toplam sayısını nasıl hesaplayabilirim?

Aslında, Outlook’ta bugün gelen tüm e-postaları "Gelen Kutusu" klasöründe, belirli bir e-posta hesabının tüm klasörlerinde veya Tüm Hesaplar arasında aramak ve ardından arama sonuçlarının toplam sayısını öğrenmek oldukça kolaydır. Aşağıdaki adımları izleyin:

"Posta" görünümünde şu adımları izleyin: (1) bugün gelen e-postaları saymak istediğiniz e-posta hesabının "Gelen Kutusu" klasörünü seçin; (2) "Anında Arama" kutusuna "received:Today" arama ölçütünü yazın; ardından (3) "Arama" sekmesindeki "Kapsam" grubundan bir Arama Kapsamı belirleyin. Ekran görüntüsüne bakın:

Artık arama sonuçlarının toplam sayısı—yani bugün gelen toplam e-posta sayısı—aşağıdaki ekran görüntüsünde gösterildiği gibi Outlook’un sol alt köşesinde görüntülenir.

Outlook’ta seçili e-postaların sayısını tek tıklamayla sayın

Bir Outlook klasöründeki tüm öğelerin veya Okunmamış Öğelerin sayısını öğrenmek kolaydır. Peki ya bir klasördeki Seçili Öğelerin sayısını hızlıca nasıl elde edebilirsiniz? İşte tam da bu noktada Seçili Öğelerin Sayısı özelliğiyle Kutools for Outlook devreye giriyor; yalnızca bir tıklamayla seçili öğelerin sayısını anında gösteriyor!

Bu yöntem, bugün gelen tüm Alınan e-postaları otomatik olarak toplayan bir arama klasörü oluşturmanıza ve ardından bu e-postaların toplam sayısını arama klasörünün özelliklerini düzenleyerek öğrenmenize yardımcı olur. Aşağıdaki adımları izleyin:

1. Arama klasörünü oluşturmak istediğiniz e-posta hesabını Gezinme bölmesinde seçin ve "Klasör" > "Yeni Arama Klasörü" seçeneğine tıklayın. Ekran görüntüsüne göz atın:

2. "Yeni Arama Klasörü" iletişim kutusunda "Özel bir Arama Klasörü oluştur" seçeneğini işaretleyip "Seç" düğmesine tıklayın. Ekran görüntüsüne göz atın:

3. Şimdi "Özel Arama Klasörü" iletişim kutusu açılır. Lütfen "Ad" alanına yeni arama klasörünüz için bir isim girin.

4. "Özel Arama Klasörü"nde "Kriterler" düğmesine tıklayın. "Arama Klasörü Kriterleri" iletişim kutusunda (1) "İleti" sekmesine tıklayın, (2) "Zaman" açılır listesinden "alındı" seçeneğini belirleyin, (3) sonraki açılır listeden "Bugün" seçeneğini seçin ve ardından (4) "Tamam" düğmesine tıklayın. Ekran görüntüsüne göz atın:

5. Şimdi "Özel Arama Klasörü" iletişim kutusuna dönün ve "Gözat" düğmesine tıklayın. Ardından açılan "Klasör(ler)i Seç" iletişim kutusunda, (1) "Klasörler" listesinden yalnızca "Gelen Kutusu"nu seçin, "Alt klasörleri ara" seçeneğini işaretleyip "Tamam" düğmesine tıklayın. Ekran görüntüsüne göz atın:

6. Ardından "Özel Arama Klasörü" ve "Yeni Arama Klasörü" iletişim kutularını kapatmak için art arda **Tamam** düğmelerine tıklayın.

7. Az önce oluşturduğunuz yeni arama klasörüne sağ tıklayın ve kısayol menüsünden "Özellikler" seçeneğini seçin. Ekran görüntüsüne göz atın:

8. Açılan iletişim kutusunda "Öğelerin toplam sayısını göster" seçeneğini işaretleyip "Tamam" düğmesine tıklayın. Ekran görüntüsüne bakın:

Artık gelen e-posta iletilerinin kopyaları her gün bu arama klasörüne kaydedilecek. Yeni bir gün başladığında, arama klasörü eski iletilerin tamamını otomatik olarak temizleyecek ve yeni günün e-posta iletilerini saymaya başlayacak.

Not: Bu yöntem, yalnızca bir e-posta hesabının Gelen Kutusu’na bugün alınan toplam e-posta sayısını sayabilir.

Yukarıdaki yöntemin yanı sıra, Outlook’ta belirli bir tarihte gelen toplam e-posta sayısını hesaplamak için VBA kodundan da yararlanabilirsiniz. Aşağıdaki adımları uygulayın.

1. Günde gelen toplam e-posta sayısını hesaplamak istediğiniz klasörü seçin ve ardından "Alt" + "F11" tuşlarına basarak "Microsoft Visual Basic for Applications" penceresini açın.

2. Ardından yeni bir modül eklemek için "Ekle" > "Modül" seçeneğine tıklayın ve aşağıdaki VBA kodunu yapıştırın.

VBA: Günde gelen Toplam E-postalar sayısını sayma

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. VBA kodunu yapıştırdıktan sonra lütfen "Çalıştır" düğmesine tıklayın.

4. Ardından açılan iletişim kutusuna, toplam gelen e-postaları saymak istediğiniz belirli tarihi girin ve "Tamam" düğmesine tıklayın. Ekran görüntüsüne bakın:

5. Seçilen klasördeki toplam e-posta sayısını gösteren bir iletişim kutusu açılır; lütfen "Tamam" düğmesine tıklayın. Ardından açılacak ikinci iletişim kutusunda ise bugün alınan toplam e-posta sayısını göreceksiniz. Ekran görüntülerine göz atın:

Notlar:
(1) Bu VBA, seçilen klasörde belirli bir tarihte alınan tüm e-postaları sayabilir.
(2) Bu VBA kodu, Outlook 2010, 2013 ve 2016 sürümlerinde sorunsuz çalışır.

Eğer Kutools for Outlook yüklüyse, bir ay içinde günde alınan toplam e-posta sayısını kolayca hesaplamak için İstatistik özelliğini kullanabilirsiniz. Aşağıdaki adımları izleyin:

1. Lütfen "KUTOOLS PLUS" > "İstatistik" seçeneğine tıklayın. Ekran görüntüsüne göz atın:

2. Şimdi İstatistik iletişim kutusu açılır; e-postaları saymak istediğiniz klasörleri seçin, Tarih Aralığı bölümünden ilgili tarihi belirtin ve "Tamam" düğmesine tıklayın. Ekran görüntüsüne bakın:

3. İkinci İstatistik iletişim kutusunda, "Ay Günleri İstatistikleri" veya "Hafta Günleri İstatistikleri" sekmesine giderek her tarihte alınan toplam e-posta sayısını görüntüleyebilirsiniz. Ekran görüntüsüne bakın:
Ayrıca "Özet" sekmesinde, Tüm Hesaplar’ın tüm Gelen Kutusu klasörlerine bugün/dün gelen toplam e-posta sayısını da görebilirsiniz.