如何创建 Outlook 规则以通过密件抄送将电子邮件重新发送给联系人组?

如何创建 Outlook 规则以通过密件抄送将电子邮件重新发送给联系人组?

如何创建 Outlook 规则以通过密件抄送将电子邮件重新发送给联系人组?

在特定的电子邮件帐户上,每当我收到电子邮件时,我都想将此电子邮件重新发送给一组人,并且我只希望他们的电子邮件地址位于密件抄送字段中。

答案1

您可以将规则设置为“运行脚本”。现在测试代码

Sub ForwardBcc(Item As Outlook.MailItem)

    Dim myRecip as Outlook.Recipient
    Dim myForward As mailitem

    Set myForward = Item.Forward
    Set myRecip = myForward.Recipients.Add("Dist List Name")

    myRecip.Resolve
    myRecip.Type = olBCC 

    myForward.Display ' Remove when tested
    ' myForward.Send  ' Uncomment when ready

End Sub


Sub ForwardBcc_Test
    ' Open a message
    Dim item as mailitem
    Set item = ActiveInspector.CurrentItem
    ForwardBcc item
End Sub

相关内容