引号 - VBA

问题描述

我试图链接一个 PNG 文件作为签名的图像源 - 使用 vba 发送电子邮件。我正在尝试调整签名(PNG 图像)的大小以及试图了解单引号和双引号指的是什么。我需要图像尺寸为高度 - 1.96 厘米和宽度 - 16.37 厘米。请指教。

 "<img src ='" & relativepath1 & "'>" **<--- This one works but signature is too big** 

"<img src='Image1.png'" & "width='500' height='400'>" **<-- Too small. And Image doesn't load**

Sub Mail_workbook_Outlook_1()

relativepath1 = ThisWorkbook.Path & Application.PathSeparator & "Signature99" & ".png"

'Create a new email message
Set OutlookMessage = OutlookApp.CreateItem(0)

On Error Resume Next
With OutlookMessage
'.Attachments.Add "C:\ Image1.PNG",olByValue,0
.To = Prime_Email
.cc = cc1
.BCC = ""
.Subject = "Donor Volume - " & " " & str2 & "(" & Subject & ")"
.HTMLBody = RangetoHTML(Range("E2:N16")) & "<img src ='" & relativepath1 & "'>"
.send
'.display
End With
On Error GoTo 0
Set OutlookMessage = nothing
Set OutlookApp = nothing
End Sub

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)