Using visual basic to access subfolder in Inbox?

Question

Dim olApp As Outlook.Application
Dim objNS As Outlook.NameSpace
Set olApp = Outlook.Application
Set objNS = olApp.GetNamespace(\"MAPI\")
Set myOlItems = objNS.GetDef         


        

Answer 1

And to drill further down, keep adding Set olFolder lines:

Set olFolder = objNS.GetDefaultFolder(olFolderInbox)
Set olFolder = olFolder.Folders("temp")
Set olFolder = olFolder.Folders("temp2")
Set olFolder = olFolder.Folders("temp3")

Gets you to \Inbox\temp\temp2\temp3\