使用 Excel VBa 发送 Outlook 电子邮件

Question

我正在开发一个 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"

结果：

等等等等等等

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

联系信息 # 2 发票信息 # 2 名字：账单发票编号：11223 姓氏：琼斯发票日期：2015 年 5 月 25 日城市：堪萨斯城发票金额：25.00 州：MO 截止日期：06/25/2015

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

Answer 1

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

使用 Excel VBa 发送 Outlook 电子邮件

Using Excel VBa to send Outlook e-mails

vba

excel

outlook-2010