Adding contacts in a distribution list

  • Thread starter Thread starter Marco Roberto
  • Start date Start date
M

Marco Roberto

Hi everyone,

I have the following issue:

I have a worksheet that has some contacts. I just want to put these contacts
in a distribution list inside the Outlook.
I have the following code:

Dim app As Outlook.Application
Dim nspace As Outlook.NameSpace
Set app = New Outlook.Application
Set nspace = app.GetNamespace("MAPI")
Dim folder As Outlook.MAPIFolder
Set folder = nspace.folders("Mailbox - Gonçalves, Marco
Roberto").folders("Contacts").folders("teste")
Dim dlist As DistListItem
Set dlist = folder.Items("Dist")

What I have to do now?
PS: Those contacts are not inside my contact folder in Outlook, so the
ResolveAll method don't work.

Any Clue?

Tks

Marco
 
If the contacts aren't in Outlook, where are they?

Why do you want to use a DL? They're terribly inefficient and difficult to
maintain.
 
Sue

I have all of my contacts in a Excel Worksheet, so I want to export them to an existing DL in the Outlook.
Each time that someone input some contact in the excel, the macro will automatically export this contac
to a DL in Outlook
The purpose of this is have the same content in the excel file and the DL
PS. I use this DL to send an e-mail everyday to the customers. Do you hav
any better idea

Tks

Marc
 
If the main purpose of these addresses is to send a message each day to the
customers, there is no need for a DL. Just use the Excel worksheet itself as
the data source for a Word mail merge.
--
Sue Mosher, Outlook MVP
Author of
Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers



Marco Roberto said:
Sue,

I have all of my contacts in a Excel Worksheet, so I want to export them
Click to expand...
to an existing DL in the Outlook.
Each time that someone input some contact in the excel, the macro will
Click to expand...
automatically export this contact
 
Back
Top