☰

向 Outlook 添加宏

tag-icon • tag-icon microsoft-outlook-2010 macros
向 Outlook 添加宏

有人问如何在 Outlook 2010 中添加宏，但我不太清楚答案。我希望在发送给特定人群（例如：议程编辑者）的电子邮件中显示一行特定的文本。该文本是“这些是 2012 年 7 月 23 日的最新更改（日期自动更新）。”我应该在哪里配置它或放置此文本？

答案1

尝试这个

Sub Boilerplate_Agenda_Editors()

    Dim objMail As MailItem
    Dim allRecipients As Recipients

    Set objMail = Application.CreateItem(olMailItem)
    Set allRecipients = objMail.Recipients

    allRecipients.Add "Your distribution list name inside the quotes"
    allRecipients.ResolveAll

    objMail.Subject = "Attention Agenda Editors"
    objMail.Body = "These are the current changes for " & Format(Now, "mmmm dd, yyyy") & "."

    SendKeys "^{END}"

    objMail.Display

    Set objMail = Nothing
    Set allRecipients = Nothing

End Sub

编辑器和按钮帮助 -http://www.slipstick.com/developer/how-to-use-outlooks-vba-editor/

宏安全性应设置为中。

按钮帮助 -http://www.howto-outlook.com/howto/macrobutton.htm

相关内容