New Email

I need to know how can I count the unreaded email in my outlook inbox??
hello_200Asked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
Guy Hengel [angelIII / a3]Connect With a Mentor Billing EngineerCommented:
The proposed solution uses MSOutlook, but could also be solved using MAPI objects (CDO).
The items counted are looked up directly in the inbox, so if you have an inbox assistant moving itmes to other folders, they won't be counted.

You need to have Microsoft Outlook in your references:

  Dim a As Outlook.Application
  Dim f As Outlook.MAPIFolder
   
  Set a = New Outlook.Application
  Set f = a.Session.GetDefaultFolder(olFolderInbox)
  msbgox f.UnReadItemCount
 
  Set f = Nothing
  Set a = Nothing
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.