Creating a Macro

  • Thread starter Thread starter kz
  • Start date Start date
K

kz

I need to create a macro that in Outlook 2000 that
performs the following:

1. Opens new Outlook Message Form
2. Puts in a contact from personal folder into the to
field.

Does anyone know code that would allow me to do this.
 
You could create a mail item (m) from a template:

Set m = Application.CreateItemFromTemplate(t)

Once you get the mail address (a) you can use:

m.Recipients.Add(a)

To get the mail address from your folder. You'll need to do spmething
like:

1) Get the personal folder using something like:

Set mapiNameSpace = Application.GetNamespace("MAPI")
Set inbox = mapiNameSpace.GetDefaultFolder(olFolderInbox)
Set MyFolder = inbox.Folders("Personal Folder2)

2) Cycle through the mails in the folder using a search string for your
contact, then grab the mail item.

3) Get the address using m.Reply.Recipients.Item(1)
 

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

Similar Threads

help creating a macro to convert Table to regular text 0
ThisOutlookSession macro problem 0
help with Outlook macro 1
Macro to create a new folder in my personal folder 3
Creating an Outlook 2007 macro that attaches a signature to new me 1
Creating a macro in Outlook 1
Outlook macro for specific email 0
Macro to export Outlook contacts 1

Back
Top