邮件自动分文件夹保存管理VBA

1。导入本VBA并设置宏有效后，当收到新的邮件时会自动按发件人归到收件箱下相应的子文件夹里，如果不存在则创建新的文件夹。省去了手动分捡邮件的时间。 2。在microsoft outlook中增加"Open Target Folder"和"Open Folder By Name..."两个自定义功能菜单项（项目名可自行修改）。选中某一邮件并点击"Open Target Folder"，会打开选择中邮件发件人的文件夹。点击"Open Folder By Name..."则会显示一个查询条件输入框，输入发件人的显示名或是邮件地址的全部或部分（支持正则表达式）可以列出所有符合条件的文件夹供选择打开。