如何避免电子邮件自动化的Outlook安全警告- VBA
如何避免电子邮件自动化的Outlook安全警告- VBA
提问于 2012-08-13 07:17:06
我正在尝试通过Outlook 2010从VBA中的Excel 2010发送电子邮件。大多数其他关于SO的答案似乎没有任何使用VBA来完成此操作的方法，Outlook/Excel2010也是如此。
有没有免费的方法？Redemption方法不是一个可行的选择，除非它很容易安装在一个大公司内部的10台机器上。
这是我目前发送电子邮件的方式：
Dim emailAddr As String
Dim OutApp As Object
Dim OutMail As Object
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
With OutMail
.To = "xxxx@xxxx.edu"
.Subject = "Demande"
.HtmlBody = CombinedValueHtml
.Send
End With
Set OutMail = Nothing
Set OutApp = Nothing
Exit Sub提前感谢您的帮助。
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/11926605
复制相关文章
相似问题