3 วิธีด่วนในการนับรายการที่ถูกตั้งค่าสถานะทั้งหมดใน Outlook ของคุณ

Outlook ช่วยให้คุณสามารถตั้งค่าสถานะรายการเพื่อติดตามผลเช่นการตั้งค่าสถานะอีเมลผู้ติดต่อและอื่น ๆ ในสถานการณ์นี้บางครั้งคุณอาจต้องการนับรายการที่ถูกตั้งค่าสถานะ ที่นี่เราจะแบ่งปัน 3 แนวทางกับคุณ

บางทีคุณอาจตั้งค่าสถานะรายการจำนวนมากเพื่อติดตามผลใน Outlook ของคุณ ตัวอย่างเช่นคุณสามารถตั้งค่าสถานะผู้ติดต่อที่คุณวางแผนจะโทรหาผู้ติดต่อรายนี้ในภายหลัง เมื่อเผชิญกับรายการที่ถูกตั้งค่าสถานะมากมายคุณอาจหวังว่าจะได้รับสิ่งเหล่านี้ หลังจากนั้นเราจะแนะนำคุณ 3 วิธี

วิธีที่ 1: นับผ่านโฟลเดอร์การค้นหา

หากคุณต้องการนับอีเมลที่ถูกตั้งค่าสถานะคุณสามารถใช้ประโยชน์จากโฟลเดอร์ค้นหาได้ นี่คือขั้นตอนโดยละเอียด

1. เริ่มต้นด้วยการคลิกขวาที่ “ค้นหาโฟลเดอร์” ในช่องนำทางของอีเมล
2. จากนั้นจากเมนูบริบทให้เลือก "โฟลเดอร์การค้นหาใหม่"
3. ในกล่องโต้ตอบป๊อปอัปให้เลือก“ Mail ถูกตั้งค่าสถานะเพื่อติดตามผล” แล้วคลิก“ ตกลง”
4. สุดท้ายคุณจะได้รับอีเมลที่ถูกตั้งค่าสถานะทั้งหมดในโฟลเดอร์การค้นหาเช่นภาพหน้าจอต่อไปนี้

วิธีที่ 2: นับในรายการสิ่งที่ต้องทำ

หากคุณตั้งค่าสถานะไม่เพียง แต่อีเมลเท่านั้น แต่ยังรวมถึงรายชื่อติดต่อกลุ่มผู้ติดต่อและอื่น ๆ คุณอาจต้องการรับจำนวนรายการทั้งหมดที่ถูกตั้งค่าสถานะเหล่านี้ ในสถานการณ์นี้คุณสามารถใช้วิธีต่อไปนี้

1. ประการแรกเปลี่ยนเป็นบานหน้าต่างนำทาง Tasks โดย“ Ctrl + 4”
2. จากนั้นเข้าไปที่“ To-Do List” ซึ่งคุณจะเห็นรายการที่ถูกตั้งค่าสถานะทั้งหมดดังภาพด้านล่าง:
3. จากนั้นเลือกรายการเหล่านี้ทั้งหมดแล้วกดปุ่ม "Enter" พยายามเปิดเป็นกลุ่ม
4. จากนั้นคุณจะได้รับคำเตือนเกี่ยวกับการเปิดรายการมากเกินไปดังภาพต่อไปนี้ ในคำเตือนมีจำนวนรายการที่ถูกตั้งค่าสถานะทั้งหมด

วิธีที่ 3: นับด้วย Outlook VBA

บางทีคุณอาจไม่เพียง แต่ต้องการรับจำนวนไอเท็มที่ถูกตั้งค่าสถานะทั้งหมดเท่านั้น แต่คุณยังต้องการรับจำนวนไอเท็มที่ถูกตั้งค่าสถานะแยกต่างหากอีกด้วย นี่คือวิธีแก้ปัญหาในส่วนนี้

1. เริ่มต้นด้วยการเข้าถึงตัวแก้ไข VBA ของ Outlook โดยอ้างอิงจากโพสต์ “วิธีเรียกใช้รหัส VBA ใน Outlook ของคุณ"
2. จากนั้นคัดลอกรหัส VBA ด้านล่างลงในโมดูลหรือโครงการ

Dim lSeparateCount, lMailCount, lContactCount, lTaskCount As Long

Sub CountFlaggedItems()
    Dim objStore As Outlook.Store
    Dim lTotalCount As Long
    Dim strMsg As String

    lTotalCount = 0
    lMailCount = 0
    lContactCount = 0
    lTaskCount = 0
 
    For Each objStore In Application.Session.Stores
        For Each objFolder In objStore.GetRootFolder.Folders
            Call ProcessFolders(objFolder, lTotalCount)
        Next
    Next
 
    strMsg = lTotalCount & " items have been flagged, as follows: " & vbCr & vbCr & "Emails: " & lMailCount & vbCr & "Contacts: " & lContactCount & vbCr & "Tasks: " & lTaskCount
    MsgBox strMsg, vbInformation + vbOKOnly
End Sub

Sub ProcessFolders(ByVal objCurrentFolder As Outlook.Folder, ByRef lCount As Long)
    Dim objSubfolder As Outlook.Folder
 
    Select Case objCurrentFolder.DefaultItemType
       Case olMailItem
            Call Count(objCurrentFolder, lCount)
            lMailCount = lMailCount + lSeparateCount
       Case olContactItem
            Call Count(objCurrentFolder, lCount)
            lContactCount = lContactCount + lSeparateCount
       Case olTaskItem
            Call Count(objCurrentFolder, lCount)
            lTaskCount = lTaskCount + lSeparateCount
            lCount = lCount + objCurrentFolder.Items.Count
    End Select
 
    If objCurrentFolder.Folders.Count > 0 Then
       For Each objSubfolder In objCurrentFolder.Folders
           Call ProcessFolders(objSubfolder, lCount)
       Next
    End If
End Sub

Sub Count(objCurfolder As Outlook.Folder, lCurCount As Long)
    Dim objItem As Object
 
    lSeparateCount = 0
    For Each objItem In objCurfolder.Items
        Select Case objItem.Class
           Case olMail, olPost, olContact, olDistList, olSharing
                If objItem.IsMarkedAsTask = True Then
                   lSeparateCount = lSeparateCount + 1
                   lCurCount = lCurCount + 1
                End If
           Case olTask
                lSeparateCount = lSeparateCount + 1
        End Select
    Next
End Sub

3. สุดท้ายคลิกเข้าไปในรูทีนย่อย“ CountFlaggedItems” แล้วกดปุ่ม“ F5”
4. เมื่อมาโครเสร็จสมบูรณ์คุณจะได้รับข้อความแจ้งจำนวนรายการที่ถูกตั้งค่าสถานะทั้งหมดดังภาพด้านล่าง

กำจัดปัญหา Outlook ที่น่ารำคาญ

ใน Outlook ปัญหาของ Outlook อาจเกิดขึ้นได้ในขณะนี้ ดังนั้นคุณควรถือเคล็ดลับและไว้วางใจได้ดีกว่า แก้ไข Outlook ยูทิลิตี้เช่น DataNumen Outlook Repair. สามารถสแกนไฟล์ Outlook ของคุณอย่างชาญฉลาดและซ่อมแซมข้อผิดพลาดของไฟล์ได้ภายในไม่กี่นาที

บทนำผู้เขียน:

Shirley Zhang เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ แก้ไข mdf และผลิตภัณฑ์ซอฟต์แวร์ซ่อมแซมแนวโน้ม ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.