在VBA中嵌入HTML文本以写入电子邮件正文
在VBA中嵌入HTML文本以写入电子邮件正文
提问于 2019-04-25 02:14:56
根据我的理解，我的代码目前正在将文本填充到HTML格式的电子邮件正文中。我正在尝试用一个变量替换文本，这样我就不必在每次运行之前编辑文本。当前在开头有一个名为Name的变量，它用"Hello Jim“填充电子邮件正文，但我希望实际正文从下一行开始，所以我不能只添加一个&，然后添加另一个变量。代码当前为：
StrTo:=Email, _
StrCC:="", _
StrBCC:=SDLEmail, _
StrSubject:=Email_Subject, _
Signature:=True, _
Send:=False, _
StrBody:="Hello " & Name & "," & _
*"<body> Here is the weekly update. Quotes are current through yesterday. " & _
"<br><br>" & " </body>"*我要添加的变量是Email_Body
回答 2
Stack Overflow用户
回答已采纳
发布于 2019-04-25 03:32:16
我不知道您的电子邮件呼叫是否可以工作，因为您没有显示完整的代码。您的StrBody包含不必要的HTML <body>标记。如果称呼语出现在电子邮件的正文中，它也被认为是正文的一部分。
假设您有两个要使用的变量：Name和Email_Body。在你打电话给电子邮件之前，先定义这些。
Name = "Jim"
Email_Body = "Here is the weekly update. Quotes are current through yesterday."如果您想轻松地更改这些值，它们也可以位于某个工作表上的单元格中。如果您有一个名为"Control“的工作表，其中包含这些值，则可以按如下方式检索它们：
Name = ThisWorkbook.Sheets("Control").Range("A2").Value
Email_Body = ThisWorkbook.Sheets("Control").Range("B2").Value当您在电子邮件命令中创建StrBody部分时，它应该如下所示：
StrBody:="Hello " & Name & ",<br><br>" & Email_Body<br>标记是换行符，因此您的文本将显示为：
Hello Jim,
Here is the weekly update. Quotes are current through yesterday.Stack Overflow用户
发布于 2019-04-25 02:51:48
您可以使用<br>添加新行
StrBody:="<body>Hello " & Name & ",<br>" & _
"Here is the weekly update. Quotes are current through yesterday. " & _
"<br><br> </body>"*页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/55836250
复制相关文章
相似问题
腾讯云开发者
