1

我有一个宏,它取代了将数据从工作簿复制/粘贴到新电子邮件中的手动过程,然后将该电子邮件发送给多个动态收件人(基于工作簿数据)。

手动完成时,电子邮件设置为高重要性(我已通过 VBA 复制),并为收件人设置后续提醒,而不是发件人。

需要明确的是,该过程不涉及发送任务或具有截止日期等的会议。设置后续提醒以提醒收件人在电子邮件正文中发布的截止日期前几个小时对电子邮件内容采取措施。

我遇到了这个论坛帖子:[ http://www.pcreview.co.uk/forums/setting-reminder-flag-vba-e-mails-sent-users-t3966711.html][1]
在帖子的底部,Sue Mosher 建议考虑到可能的缺点,这可能无法通过 VBA 实现。

有没有办法在 VBA 生成的电子邮件中设置后续提醒?

4

1 回答 1

4
Dim MyItem as Outlook.MailItem

With MyItem
            .To = EmailAddr
            .Subject = sSubject
            .SentOnBehalfOfName = "SoAndSo@sample.com"
            .HTMLBody = Msg
            .Importance = olImportanceHigh
            .FlagStatus = olFlagMarked
            .FlagRequest = "Follow up"
            .FlagDueBy = Range("F2").Value & " 10:08 AM"
End With

主要部分是.FlagStatus.FlagRequest.FlagDueBy。使用.FlagDueBy,我在我的工作簿中使用动态日期来设置截止日期,但是硬截止日期可以这样编码,FlagDueBy = "1/1/1900 12:00 AM".

于 2013-06-17T15:17:17.520 回答