VBA无法发送约会日历

问题描述:

当我手动进行日历提醒/约会时,我可以点击“邀请与会者”并选择要邀请的人,然后点击“发送”,每个人都会收到该日历提醒/约会。VBA无法发送约会日历

我有以下代码以编程方式进行提醒,但它不会发送给目标收件人。如果我在脚本运行后打开提醒并点击“邀请与会者”,我可以看到列表中充满了我想要发送提醒的人,所以我不确定为什么它实际上没有将提醒发送给他们。

任何人都可以为我阐述一些这方面的信息吗?

+0

嗯,是的,我明白你的意思!刚刚尝试过。我不知道为什么它没有发送! +1有用的问题。 –

+0

同样在这里。我看到一个叫做“SendUsingAccount”的属性,你可以这样设置:_Application.Session.Accounts(1)_。在保存该项目之前,你会这样做。它仍然没有效果。我更改了帐户(例如,在我的pop3而不是公司的Exchange服务器上尝试过)。另外,我装载了Windows 2000和Outlook XP的虚拟实例,并在那里试用。没有运气,没有回应,为什么它没有工作。 :P有趣的是在Windows 2000上,我正在发送一行安全弹出窗口,上面写着“这个应用程序即将尝试发送内容,你想允许吗?”我说允许但没有。 – ray

+0

这比我设法得到的更好。宏安全表示任何发送功能必须在发送前通知用户,所以你一定做了一些半正确的事情... 希望有人会遇到这个,并为我们提供一个答案。 – FizzBuzz

会议是约会的一种特定类型 - 约会,其他人被邀请。

为了预约会议,您不仅需要邀请与会者,而且还要做更多的事情。您需要将状态设置为“会议”。将此添加到您的代码中:

Appt.MeetingStatus = olMeeting 

另请注意,您设置了提醒,但未设置提醒时间。例如,

Appt.ReminderMinutesBeforeStart = 30 

最后,如果这是展望VBA,为什么您使用的CreateObject?您应该使用本机应用程序对象来派生所有对象。

即代替

Set olApp = CreateObject("Outlook.Application") 

你会使用

Set olApp = Outlook.Application 

HTH

+0

非常感谢JP!没有意识到我需要将它设置为会议类型。 – FizzBuzz

+0

欢迎,很高兴它的工作 – JimmyPena