View Single Post
  #2  
Old June 14th 06, 04:20 AM posted to microsoft.public.outlook.program_vba
Guy
external usenet poster
 
Posts: 12
Default Outlook Business Contact Manager Folders

I figured it out.....

Should have been Dim objFolder As Outlook.MAPIFolder

Sometimes I just don't pay attention.....

--
Guy
Forefront Business Solutions
www.forefrontbusinesssolutions.com
www.forefrontbusiness.com


"Guy" wrote in message newsMJjg.37695$A8.36185@clgrps12...
I'm trying to "walk the folders" to get to the Opportunities folder in BCM. I get a type mismatch which leaves me to believe that they can't be retrieved using MAPI?

Dim objOutlook As Outlook.Application
Dim objNS As Outlook.Namespace
Dim objFolder As MAPI.Folder

Set objOutlook = CreateObject("Outlook.Application")
Set objNS = objOutlook.GetNamespace("MAPI")
Set objFolder = objNS.Folders.Item("Business Contact Manager"). _
Folders.Item("Opportunities")

Will this not work? If I look at the Locals window they show as MAPI folders so I'm confused.


--
Guy
Forefront Business Solutions
www.forefrontbusinesssolutions.com
www.forefrontbusiness.com


Ads