如何在Outlook中使用宏发送邮件,并且使用已有签名?

2020-06-07 科技 132阅读
在工作中有一些邮件是常常需要发送,但是模式却是比较类似。 例如:日报邮件 收件人,主题,签名基本一致,除了主题中的日期需要更改之外 其他都可以采用一个模板来实现。 干脆写一个VBA函数来完成这个任务。 实践发现outlook中是不支持宏的录制的,这样就带来了一些麻烦。 在网上搜来搜去,找到了VBA编程发邮件的代码如下:'新建邮件Set OutApp = CreateObject("Outlook.Application") '创建outlook对象 OutApp.Session.Logon '登录MAPI Set OutMail = OutApp.CreateItem(olMailItem) '新建邮件对象 '设置邮件标题、收件人、等等 With OutMail .To = strTo'收件人 .CC = strCC'抄送 .BCC = "" .Subject = strSubject'主题 其中主题可以读取当前日期 mDate = Format(Now, "yyyy-MM-dd") strSubject="[日报]" & mDate 这样执行这个宏时,一封带当前日期标题的邮件已经生成好了,等待发送 可以在OutMail.body里设置
声明:你问我答网所有作品(图文、音视频)均由用户自行上传分享,仅供网友学习交流。若您的权利被侵害,请联系fangmu6661024@163.com