按名称引用文件夹

Question

我需要按名称而不是按文件夹数量来获取文件夹。我尝试过各种方法。

Dim olApp As Outlook.Application
Dim objNS As Outlook.NameSpace
'Dim OlFolder As Outlook.MAPIFolder
Dim objFolder As Outlook.Folder
Dim myolItems As Outlook.Items
Set olApp = Outlook.Application
Set objNS = olApp.GetNamespace("MAPI")
'Set myOlItems = objNS.GetDefaultFolder(37).Folders("Vijay Baswal").Items
'Open the folder
Set objFolder = olApp.Session.GetDefaultFolder("Vijay Baswal")

Answer 1

在“收件箱”下面说是一个名为“客户端”的文件夹，在下面是一个名为“ Vijay Baswal”的文件夹

设置objFolder = objNS.GetDefaultFolder（olFolderInbox）.Folders（“ Clients”）。Folders（“ Vijay Baswal”）] >>

OlDefaultFolders枚举http://msdn.microsoft.com/en-us/library/office/bb208072(v=office.12).aspx

收件箱是olFolderInbox或6。似乎没有37。

Answer 2

请参阅下面的vba片段以查看如何从特定文件夹中读取邮件

Answer 3

说您具有用户定义的文件夹访问权限检查，但没有任何默认文件夹下的权限。如何访问