如何让Excel自动发送邮件?
比如说,使用outlook批量发送工资条,并且把指定单元格区域作为表格粘贴在邮件正文内……嗯,还得增加一个《关于企业调整职工工资的通知.docx》的附件。
发送后的邮件像下图酱紫的。
首先,得有安装并注册过outlook软件。
然后,咱们得有一份工资表。发工资条嘛,没工资表发个大头鬼啊。示例工资表如下图所示。其中A列是邮箱。
再然后,在该工作簿内新建一张工作表。设定并美化下工资条。比如下图的模样。
最后,复制以下代码,激活工资条所在的工作表后运行代码就可以批量发送邮件了。
‘————邮件发送附件的路径
‘————工资表的数据装入数组
‘————工资条数据放入a2:i2区域
‘————选中b1:i2作为邮件正文的表格内容
‘————邮件正文内容
‘————Do While语句删除可能存在的旧附件