Vba如何删除Outlook收件暗黑2大箱子文件是哪个夹(如张三子文件夹)的邮件?

我想从保存的Outlook消息中提取附件,以便我可以从附加的Excel电子表格中挖掘数据。这些消息已经以.msg文件的形式保存到共享文件夹中,并且我正努力让VBA甚至将这些消息识别为文件。我最初试图在下面的代码中获取消息细节作为概念证明。

一旦我有这个工作,我可以通过循环处理文件和处理附件。我在该网站上发现了很多代码,用于从仍在Outlook中的电子邮件中提取附件,但我无法访问Outlook文件夹并且原始邮件已被删除。

我使用Excel VBA,因为我很熟悉它,但很高兴有任何其他策略建议。任何和所有的指针感激地收到。

我正在尝试将我的Outlook2003转换为最接近gmail的东西。

我开始使用类别,与gmail中的标签非常相似。我可以使用规则自动分配类别,也可以手动添加类别。我还创建了“搜索文件夹”,以显示具有给定类别的所有邮件(如果它们不在“已删除邮件”或“已发送邮件”文件夹中)。这部分几乎类似于gmail中的“标签”视图。

基本上缺少两件事,应该使用我完全没有经验的宏(准确地说是VBA)来完成。因此,我的问题是:

-有人可以向我显示一个宏来删除“收件箱”类别吗? 这就像gmail中的“存档”按钮一样。实际上,我想将此宏分配给工具栏按钮,并将其命名为Archive。我有一个将收件箱类别添加到所有传入邮件的规则。正如我所说,我有一个搜索文件夹,显示所有归类为“收件箱”的邮件,还有一个“所有邮件”搜索文件夹,该文件夹显示所有邮件,无论它们是否具有“收件箱”类别。与gmail一样,只是缺少简单的归档。

-有人可以向我显示一个宏,该宏将删除选定的邮件,并在删除前删除收件箱类别吗?我将用此宏替换默认的删除按钮。(有些不那么重要,例如,在我的搜索文件夹中,我可以过滤实际放置在“已删除邮件”文件夹中的邮件,但是如果不将邮件归类为“垃圾箱”中的收件箱,那会更加优雅。

我要回帖

更多关于 vba保存并关闭工作簿 的文章

 

随机推荐