我们前面说到使用Excel的功能自动执行PPT,自动执行Word,自动执行数据库,也许你感觉这些离你非常的遥远。我们今天要你说的是如何利用VBA代码来实现自动发送邮件功能,这个功能在我们发送通知或者工资条的时候是非常有用的一个工具,一起来了解一下吧!
使用Excel发邮件功能,我们今天分4个知识点来讲解,让你拿过去就可以直接应用到你的工作之中,减少你的不必要的重复性工作,加快你的工作效率。
- 发给我们指定所有人的邮箱联系地址
- 发送某个工作表的数据作为附件发送邮件
- 发送活动工作薄作为附件发送给联系人
- 发送指定单元格区域的值作为附件发送邮件
PS:实现以上Outlook邮件的功能,我们需要提前设置好自己的环境,就是我们对象库的引用,我们在Excel的开发工具中的工具,打开引用,在里面找到我们的Microsoft Outlook 16.0 Object Library ,如下图所示,即可完成设置工作。
A、发给我们指定所有人的邮箱联系地址
有时候我们需要给很多的人发送邮件,比如我们需要给很多的人要送某些人的地址或者联系方式,那么我们普通的操作是一个一个的粘贴复制工作,然后点击邮箱发送工作,这样看来显然效率十分的低下,我们今天说的是自动执行这个任务令应该如何去做呢?
实现这个的代码很简单,就是需要把我们登录我们的Outlook先,然后执行这个程序即可,我们需要提前设置好我们需要发送的内容。如下就是我们需要发送邮件的内容和联系人。
我们使用的代码如下:
我们看看动画吧,其实就是一键操作而已。
以上的实现方式还是很简单的,我们只需要稍微修改一下就可以拿过去使用的。
B、发送某个工作表的数据作为附件发送邮件
以上顾名思义就是把我们的工作表的数据另存一个工作薄,然后作为一个附件进行邮件发送到我们指定的人员列表中,原始数据和代码如下:
我们还是一如既往的看看动画实现的效果吧!
其实原理也是如此简单,都是自己家的兄弟产品,执行起来毫无压力。
C、发送活动工作薄作为附件发送给联系人
这个功能就比较简单啦,我们直接将我们的工作薄作为附件进行发送即可。
看看执行的效果是怎么样的吧!
是不是很简单的啊你,就在瞬间就完成啦!
D、定单元格区域的值作为附件发送邮件
假如我们需要发送邮件到指定的工作表区域的内容到其他人的列表,我们需要怎么使用代码来完成这个呢?一起看看,源数据如下:
执行的效果我们一起看看吧!
其实代码的赋值的区域进行了更改,我们变换了一种方式而已,和以上的三种其实都是一样的操作。
以上就是我们今天和大家说用代码利用Outlook发送邮件的简单方法,如果有不明白的或者不懂的可以在下方留言,我们会一一解答的。
只需要您关注我们,然后私信回我Outlook,即可得到下载链接源文件的提取码,还可以进行疑难解答。
我是Excel教案,关注我持续分享更多的Excel技巧!