Hello,

I don't understand why I can't list the Shared Calendar with this code. If a friend shares his calendar, I don't see him.

Code:
        Dim lO_OutObj As Outlook.Application
        Set lO_OutObj = CreateObject("Outlook.Application")
        
        Dim lO_fdrCalendrier As Outlook.MAPIFolder
        Set lO_fdrCalendrier = lO_OutObj.GetNamespace("MAPI").PickFolder
        
        If Not (lO_fdrCalendrier Is Nothing) Then
            MsgBox "ok"
        Else

        End If
        
        Set lO_OutObj = Nothing
        Set lO_fdrCalendrier = Nothing
Is that impossible? But if i try with Outlook exchange 2013, It's ok. With Outlook 365 nop :/