如何validationOutlook会话是否打开使用VBA

我有VBAmacros从Excel中提取LN的报告，并发送邮件给我的经理。 我已经使用调度程序来使用.vbs脚本来运行这个MACRO。 这个调度程序从星期一到星期五早上运行。 这里的问题是我们有时会在星期六和星期天的时候对我们的系统进行维修，而且前景会议也会closures。

我在这里想要的是我想写一个VBAmacros，它将首先validation出来看看会议是否打开，如果它是开放的，那么我们很好，如果不是我们需要打开Outlook会话和发送邮件。

需要你的专长:)

Answer 1

尝试使用GetObject(,"Outlook.Application")来获取对正在运行的Outlook会话的引用 – 如果失败，则可以使用CreateObject()来启动Outlook

 Dim olApp As Outlook.Application On Error Resume Next Set olApp = GetObject(, "Outlook.Application") On Error Goto 0 If olApp Is Nothing Then Set olApp = CreateObject("Outlook.Application") End If If olApp Is Nothing Then Err.Raise 999, , "Failed to get Outlook reference" End If