Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

时间:2022-10-29 07:16:02

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

我们前面说到使用Excel的功能自动执行PPT,自动执行Word,自动执行数据库,也许你感觉这些离你非常的遥远。我们今天要你说的是如何利用VBA代码来实现自动发送邮件功能,这个功能在我们发送通知或者工资条的时候是非常有用的一个工具,一起来了解一下吧!


使用Excel发邮件功能,我们今天分4个知识点来讲解,让你拿过去就可以直接应用到你的工作之中,减少你的不必要的重复性工作,加快你的工作效率。

  1. 发给我们指定所有人的邮箱联系地址
  2. 发送某个工作表的数据作为附件发送邮件
  3. 发送活动工作薄作为附件发送给联系人
  4. 发送指定单元格区域的值作为附件发送邮件

PS:实现以上Outlook邮件的功能,我们需要提前设置好自己的环境,就是我们对象库的引用,我们在Excel的开发工具中的工具,打开引用,在里面找到我们的Microsoft Outlook 16.0 Object Library ,如下图所示,即可完成设置工作。

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.


A、发给我们指定所有人的邮箱联系地址

有时候我们需要给很多的人发送邮件,比如我们需要给很多的人要送某些人的地址或者联系方式,那么我们普通的操作是一个一个的粘贴复制工作,然后点击邮箱发送工作,这样看来显然效率十分的低下,我们今天说的是自动执行这个任务令应该如何去做呢?

实现这个的代码很简单,就是需要把我们登录我们的Outlook先,然后执行这个程序即可,我们需要提前设置好我们需要发送的内容。如下就是我们需要发送邮件的内容和联系人。

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

我们使用的代码如下:

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

我们看看动画吧,其实就是一键操作而已。

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

以上的实现方式还是很简单的,我们只需要稍微修改一下就可以拿过去使用的。


B、发送某个工作表的数据作为附件发送邮件

以上顾名思义就是把我们的工作表的数据另存一个工作薄,然后作为一个附件进行邮件发送到我们指定的人员列表中,原始数据和代码如下:

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

我们还是一如既往的看看动画实现的效果吧!

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

其实原理也是如此简单,都是自己家的兄弟产品,执行起来毫无压力。


C、发送活动工作薄作为附件发送给联系人

这个功能就比较简单啦,我们直接将我们的工作薄作为附件进行发送即可。

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

看看执行的效果是怎么样的吧!

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

是不是很简单的啊你,就在瞬间就完成啦!


D、定单元格区域的值作为附件发送邮件

假如我们需要发送邮件到指定的工作表区域的内容到其他人的列表,我们需要怎么使用代码来完成这个呢?一起看看,源数据如下:

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

执行的效果我们一起看看吧!

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

其实代码的赋值的区域进行了更改,我们变换了一种方式而已,和以上的三种其实都是一样的操作。

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

以上就是我们今天和大家说用代码利用Outlook发送邮件的简单方法,如果有不明白的或者不懂的可以在下方留言,我们会一一解答的。

只需要您关注我们,然后私信回我Outlook,即可得到下载链接源文件的提取码,还可以进行疑难解答。

Excel VBA 自动使用Outlook发邮件任务,或许在刹那间你就会喜欢上他.

我是Excel教案,关注我持续分享更多的Excel技巧!