Get reference to additional Inbox

后端 未结 3 2177
情歌与酒
情歌与酒 2020-11-22 06:42

I\'m using Outlook 2007 - and have my main mailbox: Tait, Mark

I have also added another mailbox to my profile: Procurement, Request

Both appear as top level

3条回答
  •  夕颜
    夕颜 (楼主)
    2020-11-22 07:29

    Something like this should do the trick

    Dim objNS As Outlook.NameSpace
    Dim objFolder As Outlook.MAPIFolder
    Set objNS = GetNamespace("MAPI")
    Set objFolder = objNS.Folders("Procurement, Request")
    Set objFolder = objFolder.Folders("Inbox")
    

    This link has some useful code for handling different Inboxes - it may be of interest

提交回复
热议问题