troubleshooting Question
I need to point to my Personal Folders File in Outlook 2003
Vodkasoda
asked on
asked on
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(olFold
Set SubFolder1 = Inbox.Folders("Gary")
Set SubFolder2 = SubFolder1.Folders("Kickab
Set SubFolder3 = SubFolder2.Folders("Attach
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
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 ...
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(olFold
Set SubFolder1 = Inbox.Folders("Gary")
Set SubFolder2 = SubFolder1.Folders("Kickab
Set SubFolder3 = SubFolder2.Folders("Attach
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
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 ...
Join the community to see this answer!
Join our exclusive community to see this answer & millions of others.
Unlock 1 Answer and 4 Comments.
Learn from the best
Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.
Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 4 Comments.
Try for 7 days”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.