使用VBA / Outlook将多个个人文件夹收件箱合并为一个

时间:2017-11-21 13:30:51

标签: vba outlook pst

我想知道是否有办法使用VBA / Outlook浏览一些个人文件夹(全部添加到Outlook并称为个人文件夹)并复制收件箱的内容(该文件夹将始终称为收件箱)一个PST /收件箱/文件夹。个人文件夹的数量会因完成的电子邮件搜索(GVault)而异。

个人文件夹 - 收件箱, 个人文件夹 - 收件箱, 个人文件夹 - 收件箱, 最终个人文件夹 - 收件箱

目的是为用户提供一个PST,其中包含所有电子邮件。

这是尝试简化我们的电子邮件归档搜索过程的一部分,该过程为搜索中找到的每个电子邮件地址创建了一个文件夹+ PST(好的旧Google ....)这显然是将它们全部合并为一个PST的噩梦然后我们可以给用户。可以(使用Outlook)手动将每个PST与主PST相结合,但这远不是自动化过程+可能存在大量单独的电子邮件地址。

最初的问题是将所有的PST带到Outlook中,这已经解决了,但格式如上所述(单独的PST全部添加)。

任何帮助都会非常感激,因为我无法通过这个最后的障碍,有些脚本在Outlook中操作PST,他们只是不这样做。

由于 丹

1 个答案:

答案 0 :(得分:0)

下面的代码将循环您的Outlook附加PST文件复制文件在名为“收件箱”(任何情况)的文件夹中发送到PST称为“主PST”

包含非常简单的错误检查< - 免费改进

x <= y