email multiple recipients issue

[asreid2527]

Hi,
I tried to research this in other threads, but none of the examples seem to work. I am trying to send to multiple people so everyone sees each other received the email. How would I add other addresses?

Set OutApp = CreateObject("Outlook.Application")
    OutApp.Session.Logon
    Set OutMail = OutApp.CreateItem(0)

    On Error Resume Next
    With OutMail
        .To = "email2@email.com", "email1@email.com"

The last line is incorrect. I tried the following as well:

.To = ("email2@email.com, email1@email.com")

Thanks for the help

[Leith Ross]

Hello asreid2527,

Separate multiple addresses with a semi-colon, e.g.

  .To = "email2@email.com; email1@email.com"

[asreid2527]

Thanks, worked like a charm