vba listview 允许 复制_VBA应用之Outlook篇

Hi，大家好，前面几期介绍了VBA在Word和Excel的上的一些基础应用，虽然绝大部分的应用都是在Excel上，但是利用VBA代码批量生成邮件，添加附件，自动发邮件的这些需求，也是在日常的工作中会经常遇到的，这里介绍下如何使用VBA调用Outlook发送邮件。

要想利用Outlook发送邮件，则首先需要设置Outlook邮件收发功能，添加邮箱账号，设置好收发邮件服务器地址及端口，确保Outlook能够正常的收发邮件，具体的设置方法及参数因邮件服务器不同而不同，这里就不赘述了。

要想利用VBA代码控制Outlook发送邮件，需要对Outlook应用程序在VBA代码中进行抽象，像此前的Word/Excel一样，VBA代码中同样使用application的对象来代表Outlook应用程序。

但是之前说过，VBA的代码可能更多的是运行在Word/Excel中，此时默认的appliction代表着Word/Excel的应用，若要同时打开或者切换到Outlook上，则需要使用代码创建一个application对象，并将其关联Outlook应用程序上。

之后就像是我们正常使用Outlook一样，通过VBA代码新建邮件，然后设置邮件的主题，收件人，编写邮件正文，然后添加附件等操作，检查无误后点击发送，即可将邮件发送出去。

下面通过一个简单的例子，看看具体的代码：