通过 Outlook 从 MS Project 发送电子邮件答案

【问题标题】：Send Email from MS Project via Outlook通过 Outlook 从 MS Project 发送电子邮件
【发布时间】：2016-05-11 14:51:16
【问题描述】：

我正在尝试通过 Outlook 打开和填充来自 MS Project 的电子邮件。我之前在 Excel 中完成过此操作，但是当我将代码放入 Project 时出现错误。

'Create and Set New Mail Item
Dim OutlookApp As Outlook.Application
Set OutlookApp = CreateObject("Outlook.Application")

Dim OutlookMail As Outlook.MailItem
Set OutlookMail = OutlookApp.CreateItem(OutlookMailItem)

在 Dim OutlookApp 行上触发错误并显示“未定义用户定义的类型”

我在这里忘记了什么？

【问题讨论】：

工具 => 参考并勾选 Microsoft Outlook ??.?对象库
是的！我忘记了“Microsoft Outlook 15.0 对象库”。我知道这将是显而易见的。谢谢，
您也可以将 Outlook.Aplication 和 Outlook.MailItem 替换为 Object 这样您将进行后期绑定，因此不再需要对 Outlook 库的引用，无论您在其中运行代码的应用程序。您还必须在对 CreateItem 的调用中将常量 OutlookMailItem 替换为 0（它的实际值）

标签： vba email outlook ms-project

【解决方案1】：

我不确定我是否理解这个要求，所以我发送了一个盲注。在 Project 2007 中，您会在屏幕右上角看到一个组合框，可能默认为“所有任务”。使用您需要的信息选择您想要的日期范围，并将其连同您需要激励他们的任何鼓励性话语一起发送给您的团队。

这会有帮助吗？

【讨论】：