Sobre Visual Basic

Hola,
Resulta que estoy intentando acceder a una public folder en Outlook 2010 y uso este código:
Private Sub GetOutlookFolderID()
Dim olfolder As Outlook.MAPIFolder
Dim olapp As Outlook.Application
Set olapp = CreateObject("Outlook.Application")
Set olfolder = olapp.GetNamespace("MAPI").PickFolder
olfolder.Display
Debug.Print olfolder.EntryID
Set olfolder = Nothing
Set olapp = Nothing
End Sub
Private Sub GetFolderFromID()
Dim olfolder As Outlook.MAPIFolder
Dim olapp As Outlook.Application
Set olapp = CreateObject("Outlook.Application")
Set olfolder = olapp.GetNamespace("Mapi").GetFolderFromID("InsertEntryIDHere")
olfolder.Display
Set olfolder = Nothing
Set olapp = Nothing
End Sub
La primera parte me da el EntryID de la segunda rutina pero cuando ejecuto la segunda con este PATH: "\\Public Folders\All Public Folders\Mineral me da que no puedo abrir el objeto porque no lo encuentra. Ya he probado todas las posibilidades pero sin éxito.
Podría ayudarme?
Muchas gracias

Añade tu respuesta

Haz clic para o