从另一个软件通过MAPI发送电子邮件时执行Outlook VBA

Question

我在 ThisOulookSession 中使用以下VBA代码在发送电子邮件时添加BCC地址：

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMe As Recipient
    Set objMe = Item.Recipients.Add("some@address.dot")
    objMe.Type = olBCC
    objMe.Resolve
    Set objMe = Nothing
End Sub

从Outlook本身发送时，它完美无缺。但是当我使用MAPI通过我的CRM程序发送电子邮件时，VBA不会被执行。所以我认为使用MAPI发送电子邮件不会在帐户中使用 ThisOutlookSession 。

有没有办法用Outlook本身和MAPI执行我的VBA宏？

Answer 1

通过简单MAPI或mailto链接发送邮件时，不会触发

Application.ItemSend事件。这是设计的。