Adding contacts in a distribution list

[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

 

[Sue Mosher [MVP]]

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.

 

[Guest]

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

 

[Sue Mosher [MVP]]

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

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 contact