Vba 引用exchange日历

是否有方法使用VBA访问Outlook中的共享日历

活动用户拥有访问和编辑日历的所有权限，不包括父文件夹本身。通过Outlook访问日历没有问题，但我们找不到通过VBA代码访问日历的方法

如何通过代码访问这样的日历

这个

 objFolder = objNS.GetSharedDefaultFolder(objRecipient, 9)

。。。无法工作，因为我自己的文件夹刚刚被返回，即使对象不是我自己

For indx = 1 To objNS.Folders.Count
    Set objFolder = objNS.Folders(indx)
Next indx

。。。也不起作用，因为所需的日历未包含在返回的值中

---

如有任何建议，我将不胜感激，谢谢和问候

经过一些错误跟踪，我们得出结论，Exchangeserver没有正确同步。重置userprofile有助于解决此问题

您确定objRecipient已正确解析吗？我从未见过GetSharedDefaultFolder返回当前用户的日历文件夹，而不是指定为参数的用户。据我所知，它解析正确。在调试时，它甚至会解析为正确的标题，因此thaz不应成为问题所在。