Consulting

Results 1 to 5 of 5

Thread: Email distribution list members separately

  1. #1
    Administrator
    VP-Knowledge Base
    VBAX Grand Master mdmackillop's Avatar
    Joined
    May 2004
    Location
    Scotland
    Posts
    14,489
    Location

    Email distribution list members separately

    For reasons of confidentiality, we have to send separate emails to each tenderer on a list (Maximum 6-8 recipients). I'd like to be able to use an distribution list, but I need to send to each, with no details of any of the other recipients. Can this be done without code, or do I need a bit of VBA?
    Regards
    MD
    MVP (Excel 2008-2010)

    Post a workbook with sample data and layout if you want a quicker solution.


    To help indent your macros try Smart Indent

    Please remember to mark threads 'Solved'

  2. #2
    Knowledge Base Approver
    The King of Overkill! VBAX Master
    Joined
    Jul 2004
    Location
    Rochester, NY
    Posts
    1,727
    Location
    To parse the list I think you'd have to use VBA, but why not do something like

    From: MD
    To: MD
    BCC: DistributionList

    The recipients wouldn't know of each other, only see your name in the From and To, and you wouldn't have to use a macro or anything
    Matt

  3. #3
    Administrator
    VP-Knowledge Base VBAX Grand Master mdmackillop's Avatar
    Joined
    May 2004
    Location
    Scotland
    Posts
    14,489
    Location
    Hi Matt,
    The emails have to be addressed to each recipient, which I doesn't happen with BCC
    MVP (Excel 2008-2010)

    Post a workbook with sample data and layout if you want a quicker solution.


    To help indent your macros try Smart Indent

    Please remember to mark threads 'Solved'

  4. #4
    Knowledge Base Approver
    The King of Overkill! VBAX Master
    Joined
    Jul 2004
    Location
    Rochester, NY
    Posts
    1,727
    Location
    I understand.. unless you want to do it manually, I don't think theres a way without using VBA

    To see how it would be done, this writes an email to everyone in a list named "Cards":[vba]Sub MDMDistribute()
    Dim DList As DistListItem, i As Long
    Set DList = Application.Session.GetDefaultFolder(olFolderContacts).Items("Cards")
    For i = 1 To DList.MemberCount
    With Application.CreateItem(olMailItem)
    .To = DList.GetMember(i)
    .Subject = "September Mailing"
    .Body = "Hi"
    .Display
    '.Send
    End With
    Next
    End Sub[/vba]
    Matt

  5. #5
    Administrator
    VP-Knowledge Base VBAX Grand Master mdmackillop's Avatar
    Joined
    May 2004
    Location
    Scotland
    Posts
    14,489
    Location
    Thanks Matt,
    I'll give it a try tomorrow.
    MVP (Excel 2008-2010)

    Post a workbook with sample data and layout if you want a quicker solution.


    To help indent your macros try Smart Indent

    Please remember to mark threads 'Solved'

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •