Question

我有一个带脚本的规则，几乎可以正常工作.. 我想将一些特定的传入电子邮件转发到带有规则的电子邮件地址，但我也想稍微改变一下这个主题。

我有这个代码可以正常工作：

Sub ForwardEmail(Item As Outlook.MailItem)
    Set myForward = Item.Forward
    myForward.Subject = ("ITS - ") & Item.Subject
    myForward.Recipients.Add "backup@email.com"
    myForward.Send
End Sub

我的问题是，当此规则激活后，转发的电子邮件将获得我的签名以及来自：已发送：收件人：主题：＆＃34;上一封电子邮件中的行。在转发消息之前有没有办法删除它们？

也许如果我根据传入的电子邮件发送新电子邮件可以吗？我的电子邮件中包含正文中的图片（不是附件），因此可能会导致我的问题。

Answer 1

你可能想试试这个：

Sub ForwardEmail(Item As Outlook.MailItem)
    With Item.Forward
        .Subject = ("ITS - ") & Item.Subject
        .Recipients.Add "backup@email.com"
        ' You need to overwrite the Body or HTMLBody to get rid of the auto signature
        .HTMLBody = Item.HTMLBody ' <-- Or use .Body for Plain Text
        '.Display ' <-- For Debug
        .Send ' <-- Put break here to Debug
    End With
End Sub

Otlook vba并规则转发电子邮件并更改主题

1 个答案: