troubleshooting Question

I need to point to my Personal Folders File in Outlook 2003

Avatar of Vodkasoda
VodkasodaFlag for Ireland asked on
OutlookVisual Basic Classic
4 Comments1 Solution352 ViewsLast Modified:
Hi, I am a Mainframe Programmer, but by no means an experienced VBA user, so whilst I can code the logic and processing, I have trouble with the pointers and setting up of variables, hopefully somebody can help me with this ...

I have the following VBA code that I used in an Outlook 2000 macro to access a specific personal folder which was just a sub-folder within INBOX :

Set ns = GetNamespace("MAPI")
Set Inbox = ns.GetDefaultFolder(olFolderInbox)
Set SubFolder1 = Inbox.Folders("Gary")
Set SubFolder2 = SubFolder1.Folders("Kickabout")
Set SubFolder3 = SubFolder2.Folders("Attachments")

This means I end up with SubFolder3 as the pointer to the folder I want to access.
 
In Outlook 2003, my folders are no longer sub-folders of INBOX, but are within a Personal Folders File "TheHeaths", though the sub-folders Gary/Kickabout/Attachments are the same ...

How do I amend/replace this code to work in Outlook 2003 please, to point directly at the Personal Foldefs File folder that I want to access ?!?

Any help much appreciated ...
ASKER CERTIFIED SOLUTION
Log in to continue reading
Become an EE member today7-DAY FREE TRIAL
Members can start a 7-Day Free trial then enjoy unlimited access to the platform for $9.99/mo
View membership options
Unlock 1 Answer and 4 Comments.
or
Learn why we charge membership fees
We get it - no one likes a content blocker. Take one extra minute and find out why we block content.
See how we're fighting big data
The Value of Experts Exchange in My Daily IT Life

Experts Exchange (EE) has become my company's go-to resource to get answers. I've used EE to make decisions, solve problems and even save customers. OutagesIO has been a challenging project and... Keep reading >>

Mike

Owner of Outages.IO
Phoenix, Arizona, United States
Member Since 2016
Join a full scale community that combines the best parts of other tools into one platform.
Unlock 1 Answer and 4 Comments.
View membership options
“All of life is about relationships, and EE has made a virtual community a real community. It lifts everyone's boat.”
William Peck

Member since 2004