Example code:
Code: Select all
Set olApp = GetObject(Class:="Outlook.Application")
Set olNsp = olApp.GetNamespace("MAPI")
' Get the StoreID, which is a property of the folder.
StoreID = olScr.StoreID
Set olItm = olNsp.GetItemFromID(ItemID, StoreID)
'Something like......
olItm.Select