将 Web 链接设置为 VBA 电子邮件中的“单词”
如果此电子邮件无法正常显示，请单击此处。
我希望能够让电子邮件中的人单击“此处”一词，然后将他们带到一个网站。
这是我一直在使用的，但它只是将完整的链接放入电子邮件中。
mymsg = "<HTML><BODY>"
mymsg = "If this email does not display properly, please click " & "<A href=http://us.localnews.com/ov?mailing=3TVGZMLJ-WDS49&m2u=3TVGZMLK-3TVGZMLJ-12Z630I>URL Text</A>"
mymsg = mymsg & "</BODY></HYML>"
守候你守候我浏览 93回答 1
1回答
-
ABOUTYOU
保持简单，不需要HTML/BODY标签例子Option ExplicitPublic Sub Example() Dim OutApp As Object Set OutApp = CreateObject("Outlook.Application") Dim OutMail As Object Set OutMail = OutApp.CreateItem(0) With OutMail .HTMLBody = "If this email does not display properly, please click " & _ "<A href=https://stackoverflow.com/>" & _ "Here</A>" .Display End WithEnd Sub确保您正在使用HTMLBody属性返回或设置一个表示指定项目的 HTML 正文的字符串。HTMLBody 属性应该是 HTML 语法字符串。读/写。
随时随地看视频慕课网APP
相关分类
Html5