VBA Excel - 想要将不同的图像嵌入到CDO电子邮件中

Question

好的，我已经有一段时间没有进展了，所以我会把它扔给你们。我正在VBA for Excel中编写一个程序，向客户发送电子邮件。我想改变电子邮件发出的图像。我发现嵌入图片的唯一工作方式是引用像imgur.com这样的网站并将其嵌入到HTML电子邮件中。

我正在尝试的代码是：

emailBody = emailBody & "<img src='Worksheet("Coupon Page").Cells(D, i).Value'/>" & "<br/>"

它应该从单元格(D,i);中的链接添加图像，其中D是列标题，i是确定图像的变量。当它碰到优惠券页面上的双引号（“）时会抛出错误，表示期待结束表达式。我不知道如何继续这里。我不知道如何使图像因基于变量i。非常感谢任何想法或想法！

谢谢！

Answer 1

emailBody = emailBody & "<img src='" & _
           Worksheet("Coupon Page").Cells(D, i).Value & "'/><br/>"