限 时 特 惠： 本站每日持续更新海量各大内部创业教程，一年会员只需98元，全站资源免费下载 点击查看详情
站 长 微 信： muyang-0410
写在前面：What is the the US and the Euro today?
或许在人资或者财务人员正常工作中会遇到要批量发送邮件的工作，例如财务部根据每个人的工资情况发放工资条到个人的邮箱，需要完成大量的重复工作，非常适合批量发送。
因涉及到大量重复的工作，我们就想到如何让这重复性的工作进行自动化，如何利用表格建立数据，利用邮箱自动来发送这些数据，要求发送文件到对方的邮箱。
这个例子你有没有遇到过？每个月工资条如何发放给大家是一个头疼的事情，因为工资涉及到保密问题，用邮件吧，每个人的邮件内容都有些不一样的地方，人一多就特别容易出错；光这个发工资条就够让人忙活好长时间的了
我们今天就来赶紧聊一下大家之前关心的一个问题，如何让Excel通过QQ邮箱自动发送邮件？
如下图所示，是一份名为“数据”的工作表，A列是收件人的邮箱，B列是邮件的标题，C列是邮件的正文，D列用于标注是否成功发送邮件。
PS:或许你就要问了smtp.qq.com，何为SMTP密码？我们将在下方解释。
点击按钮运行代码即可达到批量发送邮件的目的。
代码如下：
PS:变量指定了邮件添加附件存放的路径和名称，给不同的人发送相同的附件。当然这个也可修改成发送不同的附件。
如果将一封邮件发送多人，不同收件人之间使用半角分号间隔即可，例如：
“1@qq.com;5@qq.com;6@qq.com”
我们要如何获取邮箱的smtp服务码呢？其实很简单的
打开网页版qq邮箱，依次单击【设置】→【账户】；找到POP3/IMAP/SMTP///服务，选择开启IMAP/SMTP服务。开启SMTP服务后smtp.qq.com，会获得相关密码。
例外需要说明的一点是上面的代码稍加修改也可以用于我们常用的163邮箱发送邮件。
我们只需要修改发件人的邮箱地址、名称和对应的smtp服务密码。同时将以下语句：
.Item( & “”) = “smtp.qq.com“
修改为：
.Item( & “”) = “smtp.163.com”
限 时 特 惠： 本站每日持续更新海量各大内部创业教程，一年会员只需98元，全站资源免费下载 点击查看详情
站 长 微 信： muyang-0410
