从自定义外观表单生成新电子邮件

我已经构建了一个存储其上的某些联系人数据的表单。我想包括几个按钮/功能，以尽可能地保持用户的形式，而不是在Outlook组件（日历，邮件等）之间切换。从自定义外观表单生成新电子邮件

在这种情况下，用户可以从单独的ListBox交换电子邮件地址，当他们点击按钮时，它将使用其中一个电子邮件。使用VBS是因为我正在处理自定义Outlook表单。

Sub GenerateButton_Click() 
    'Generates Email with all of the CCs 

    'Variables 
    Set FormPage = Item.GetInspector.ModifiedFormPages("Commands") 
    Set DoSend = FormPage.Controls("DoSendListBox") 
    mailList = "" 

    'Generate Email List 
    For x = 0 to (DoSend.ListCount - 1) 
     mailList = mailList & DoSend.List(x) & ";" 
    Next 

    'Compose Email 
    Set msg = Application.CreateItem(olMailItem) 
    msg.Subject = "Hello World!" 
    msg.To = mailList 
End Sub

会发生什么
- 它编译
- 什么也没有发生在点击

研究
- 通常是在VBA在线论坛
- 相关文章使用外部连接，而不是从内展望

来源

2016-07-05 David Bell

求解
注意：单击“脚本”选项并选择对象项目。在新窗口中，您可以浏览课程，从中可以找到MailItem。您可以在右侧窗格中看到所有方法/属性。

事实证明了正确的语法是：

Set msg = Application.CreateItem(MailItem) 
msg.Display

来源

2016-07-05 21:45:49

从自定义外观表单生成新电子邮件

回答

相关问题