使用Excel VBa发送Outlook电子邮件

时间:2015-06-01 17:39:35

标签: vba excel-vba outlook-2010 excel

我正在开发Excel宏来向特定客户发送电子邮件。到目前为止我的代码工作得很好。这是我用Outlook完成的第一个宏。我遇到的问题是DETAIL_INFO变量。详细信息应包含2列:(1)用于客户信息,(2)用于发票信息。每列中将有4或5个字段。我试图做的是在电子邮件的乞讨处有一些措辞,然后在2列中显示发票信息。我希望每张发票都有一个单独的部分。可能有1张发票或可能有多张发票。一旦显示发票信息,就会有一些额外的措辞。

可以这样做吗?代码下面是一些示例结果。谢谢你的帮助...

strbody = "<font size=""3"" face=""Calibri"">" & _
    Date & "<br><br>" & _
    VarB & " " & VarC & "<br>" & _
    Add1 & "<br>" & _
    Add2 & ", " & Add3 & "    " & Add4 & "<br><br><br>" & _
    "Dear Customer,<br><br>" & _
    "Thank you for choosing us.<br><br>" & _
    "We appreciate your business.  At times, we follow up with customers<br>" & _
    "to minimize confusion.<br><br>" & _
    "Please see below for more details:<br><br><br>" & _
    DETAIL_INFO & "<br>" & _
    "<br><br><br>Our goal is to handle these situations as promptly as possible." & _
   "Again, we appreciate the opportunity to serve you.<br><br>" & _
    "Sincerely,<br>" & _
    "ABC Company"

结果:

blah blah blah

联系信息发票信息 名字:Joe发票ID:12345 姓氏:史密斯发票日期:05/15/2015 城市:堪萨斯城发票金额:15.00 州:MO截止日期:06/15/2015

联系信息#2发票信息#2 名字:票据发票ID:11223 姓氏:琼斯发票日期:05/25/2015 城市:堪萨斯城发票金额:25.00 州:MO截止日期:06/25/2015

再次感谢您的帮助.......

1 个答案:

答案 0 :(得分:0)

查看Ron de Bruin's site了解创建电子邮件的好方法。链接页面显示了如何让Excel完成将范围转换为HTML电子邮件的艰苦工作。