嵌入图像并将文件附加到通过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>"