กำลังใช้ vba ใน outlook หา จำนวน unread เมลล์
ตาม code นี้
[Spoil] คลิกเพื่อดูข้อความที่ซ่อนไว้Private Sub Application_NewMail()
Dim oOlAp As Object, oOlns As Object, oOlInb As Object
    Dim oOlItm As Object, oOlAtch As Object

    
    '~~> Get Outlook instance
    Set oOlAp = GetObject(, "Outlook.application")
    Set oOlns = oOlAp.GetNamespace("MAPI")
    Set oOlInb = oOlns.GetDefaultFolder(olFolderInbox)  <<< ตรงนี้ต้องใส่ inbox ของเมลเรา
    

    '~~> Check if there are any actual unread emails
    If oOlInb.Items.Restrict("[UnRead] = True").Count = 0 Then
        MsgBox "NO Unread Email In Inbox"
        Exit Sub
    End If
End Sub

แต่หาไม่เจอว่า inbox ของเรา ชื่อ อะไร ทำให้พอ run code มันแจ้งเราว่า = 0 ตลอด
ต้องแก้ไขอย่างไรครับ