如何用vba遍历outlook收件箱中的邮件并另存所有的附件?

在outlook中数据都是存放在具体的文件夹内的,文件夹之间具有层级关系。

收件箱就属于一个文件夹,可以使用NameSpace对象的GetDefaultFolder方法直接获得默认的文件夹对象Folder,如收件箱文件夹,发件箱文件夹对象等。

所有文件夹下的邮件构成了Items集合对象。

以下vba代码举例示范了如何用vba遍历收件箱中的所有邮件,并将邮件的附件另存在本地电脑上:

       

发表评论