Question Need to get Mailbox ID from outlook for an Email

[Manjeeth Kidiyoor]

Hi Team..

I have multiple mailbox access in my Outlook.

The mail which i open and run the macro should give me the Mailbox ID.

The below codes gives me all the Mailbox IDs but i need only one MailID where the mail has been received.

Could someone please help me with this. Thank you so much in advance.



Sub Test()
Dim objSession
Dim objNamespace
Dim objMailbox

Set objSession = Application.Session
Set objNamespace = Application.GetNamespace("MAPI")
For Each objMailbox In objSession.Folders
MsgBox objMailbox.Name

Next
End Sub

 

[outriggercentroid424]

Hi Team..





Sub Test()
Dim objSession
Dim objNamespace
Dim objMailbox

Set objSession = Application.Session
Set objNamespace = Application.GetNamespace("MAPI")
For Each objMailbox In objSession.Folders
MsgBox objMailbox.Name

Next
End Sub

Any help? I'm smashing my head to a wall. :banghead:

 

[darbid]

I think what you are after is the Stores / Store object which is available from Outlook 2007 onwards. https://msdn.microsoft.com/en-us/library/office/ff867405(v=office.14).aspx