我有一个宏,它接受我选择的电子邮件的描述,并填充从模板创建的表单的“消息”字段:
sText = olItem.Body
Set msg = Application.CreateItemFromTemplate("C:\template.oft")
With msg
.Subject = "Test"
.To = "user@user.com"
'Set body format to HTML
.BodyFormat = Outlook.OlBodyFormat.olFormatHTML
.HTMLBody = "<HTML><BODY>EmailDesc: " + sText + "</BODY></HTML>"
.Display
End With
在这个模板中,我有更多的字段要填写,例如组合框..。
我想知道,当我点击发送按钮时,如何获取这个组合的值,并在发送前将其连接到电子邮件的内容?
生成这样的东西:
EmailDesc: TEST SEND EMAIL BLA BLA BLA..
ComboboxValue: Item1
谢谢