Inbox - GetSharedDefaultFolder

[Summer]

I am trying to access another inbox that is mapped to my outlook. I would like to loop thru that inbox like I do mine. The problem is I use this code to access my default inbox: Set TestFolder = olns.GetDefaultFolder(olFolderInbox)
In order to access the other Inboxes attached to my Outlook I thought GetSharedDefaultFolder would work, but I'm not sure if I'm doing it right.


Summer

 

[Summer]

I figured it out sometimes trial and error goes a long way..
Heres the helpful code:

dim olns as outlook.namespace

For j = 1 To olns.Folders.count

Debug.Print olns.Folders.Item(j).Name
Next