Search code examples
vbaoutlookdistribution-list

Ensuring the contacts in a Distribution List are displayed with both name and email address


How can I ensure the contacts I add to an Outlook distribution list are displayed with both name and email address? These contacts may not exist in any other address book, just the distribution list. Currently they show up just as an email address (in both columns).

alt text http://img52.imageshack.us/img52/1804/tempgg.jpg

Here's roughly the VBA we're using:

    Do Until RS.EOF

        //here's where we want to inject RS!FirstName, RS!Surname etc
        objRecipients.Add RS!Email
        objRecipients.Resolve

        RS.MoveNext
    Loop


    Set objDistList = contactsFolder.Items.Add("IPM.DistList")
    objDistList.DLName = "Whatever"

    objDistList.AddMembers objRecipients
    objDistList.Save

    etc

Solution

  • Thanks to Dick Kusleika for his answer but Graeme's answer here gave me an idea there could be an easier way.

    And that is just to use angle brackets in the entry to the distribution list. As in "Ringo Starr<[email protected]>"

    Which works just fine.

    So my original example would look like this:

    objRecipients.Add RS!FullName & "<" & RS!Email & ">"