将图像嵌入并附加到通过Excel VBA发送的电子邮件中

Question

我正在编写一段代码来填充电子表格，然后通过电子表格作为附件将其发送给一群人，以及解释性PDF和HTML求职信（以公司徽标为特色）在电子邮件正文中。

现在，我之前已经发送过带有Excel VBA代码的电子邮件，并且我已在.HTMLBody中使用HTML格式化了他们的布局。但是其他一些东西让我有些麻烦。

我认为我能搞清楚的附件;我假设我可以使用多个.Attachments.Add与各种文件，但是没有尝试过。

主要问题是电子邮件正文中的公司徽标。我对HTML非常了解，但是当我没有src时，我无法弄清楚如何实际嵌入图片。

谷歌搜索已经产生了一些方法，但他们已经cid为基础，并且只有在读者使用Outlook时才有意见。

有什么建议吗？有一个很好的简单解决方案吗？

Answer 1

尝试以下代码，

用于将图像附加到您的邮件（在创建邮件对象下添加），

       .Attachments.Add ThisWorkbook.Path & "\image.png"

将此添加到您的邮件正文中（假设您正在使用表格）

"<td Colspan=2><img src='cid:image.png' height=205 width=1015></td>"