☰

我可以创建 Outlook 2010 宏来弹出框吗？

tag-icon • tag-icon microsoft-outlook microsoft-outlook-2010
我可以创建 Outlook 2010 宏来弹出框吗？

我正在尝试设置一个宏，以便弹出一个框来选择从哪个电子邮件帐户发送电子邮件。我实际上在这里找到了可以执行此操作的宏，但在工作时间尝试了几次之后，我得到的只是工具栏上的一个按钮，它什么也不做！

有人能详细地告诉我该怎么做吗？

这是我尝试的宏 -

Sub SendfromLE()
Dim oAccount As Outlook.Account
Dim oMail As Outlook.MailItem

For Each oAccount In Application.Session.Accounts
   If oAccount = "LeadEmployerRecruitment" Then
      Set oMail = Application.CreateItem(olMailItem)
      oMail.SendUsingAccount = oAccount
      oMail.Display
   End If
Next
End Sub

我不确定我是否正确命名了帐户？它需要完整的电子邮件地址还是只是名称？

答案1

尝试这个

For Each oAccount In Application.Session.Accounts

Debug.Print oAccount
If oAccount = "Whatever you see in the immediate pane" Then
    Set oMail = Application.CreateItem(olMailItem)
    oMail.SendUsingAccount = oAccount
    oMail.Display
End If
Next

相关内容