excel批量发邮件问题协助

1149778968

各位朋友好！
我在网上找到一个EXCEL批量发邮件的代码，可以正常运行，但是现在我想再增加下面2个功能：
1、邮件发送后跳出一个对话框提示如”共发送了N封邮件“这样的，这个N是变量，发出几封邮件就提示发送了几封。
2、如果没有附件则邮件不发送。因为有很多的不同的附件发送给不同的人，一一对应，但有的人可能没有附件，而这个代码对于没有附件时会自动关闭excel，所以想要有这么个功能。
这个代码里面的HTML格式邮件正文、发送多个附件、替换正文部分内容功能不能更改，需要保留。

还请各位大神帮帮忙，万分感谢！