首页
学习
活动
专区
圈层
工具
发布
首页
学习
活动
专区
圈层
工具
MCP广场
社区首页 >问答首页 >从-其他用户收件箱读取邮件的VBA代码(Outlook收件箱)

从-其他用户收件箱读取邮件的VBA代码(Outlook收件箱)
EN

Stack Overflow用户
提问于 2012-03-07 09:55:20
回答 1查看 3.7K关注 0票数 0

可能重复:

Outlook 2007 VBA to get reference to additional Inbox

Wwe需要通过文件-> open ->其他用户的文件夹在Microsoft中打开其他用户收件箱。那我们需要检查一下邮件。我们已经尝试了下面的代码

代码语言:javascript
运行
复制
  Set olApp=CreateObject("Outlook.Application") 
     Set olns=olApp.GetNameSpace("MAPI") 
     Set objFolder=olns.GetDefaultFolder(6)
     For each item1 in objFolder.Items 
             msgbox item1.subject     
     Next

但是使用此代码,我们无法从其他用户收件箱中读取邮件,因为GetDefaultFolder方法参数为6。有人能帮个忙吗

EN

回答 1

Stack Overflow用户

发布于 2012-03-09 21:12:45

您可能需要使用以下内容:

代码语言:javascript
运行
复制
Dim objFolder As Outlook.Folder
Set objFolder = Application.Session.PickFolder

这应该会弹出一个框,允许您选择要从其中读取的文件夹。但是,这个选项需要一些用户交互。

您还可能希望尝试使用以下更改的代码:

代码语言:javascript
运行
复制
Set ObjFolder = Application.Session.GetDefaultFolder(variable)

变量是默认文件夹的名称(对于收件箱来说是olFolderInbox )

票数 0
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/9599200

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档