VBA in Outlook accessing Subfolders in Public Folders

B

Brad Simon

Hi all,

I am trying to write a few macros that will allow my
customer to add contacts to 2 different folders in public
folders/All Public Folders. The sub folders are all set
to hold contact items.

What I can't figure out is how would I add a new contact
to these folders, and how would I access the contacts in
these folders using another macro?

I can't find anything in the help files that tell me
anything about it.

All help is appreciated, and thanks in advance.

Brad Simon
Symasytes Computer Solutions
 
R

rajkondeti

Hi,



I have the following immediate requirement for you with a Major
Financial Client based at NYC.



The duration of the project is 6 Months.



Skills Required: Strong experience in VBA, Sybase, Excel along with
Risk management.



Pls send your RESUME, RATE and CONTACT INFO immediately.



Thanks&Regards,

Raj

Technical Recruiter

Pinnacle Systems, Inc

Work: 732-653-7009

(e-mail address removed)
 
B

Brad Simon

Thanks, but this does NOT answer my question, and you
should NOT be posting this on THIS newsgroup. It is for
Technical professionals, and MSDN Members ONLY, NOT
recruiters.
 
D

Dick Kusleika

Brad

Check the last post in this thread

http://www.google.com/[email protected]

for an example of how to access public folders. Basically, it should look
like this

Dim Fldr as MAPIFolder
Dim olNs as Namespace
Dim olCi as ContactItem

Set Fldr = olNs.Folders("Public Folders").Folders("All Public
Folders").Folders("My Public Folder1")

Set olCi = Fldr.Items.Add(olContactItem)

With olCi
.FullName = "john doe"
.Save
End With

I don't have Exchange, so I'm not sure what the folder path to your folder
would be, but that's the basic structure of adding a contact to a specific
folder.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top