Dear all

Forgive me if this is too easy for you but I am hoping you can help

I am using code (kindly supplied by your good selves) that sends an excel document via my email client, Lotus Notes. The following code asks the user to type in the person they want to send the email to and it is defaulted to a mail address already:

 'Get the name of the recipient from the user.
    Do
        vaRecipient = Application.InputBox( _
        Prompt:="Please type the name of the recipient you are sending this to:" & vbCrLf _
        & "or the full address if they are not on the internal Haden mailing list.", _
        Title:="Recipient", Default:="HadenGas", Type:=2)
    Loop While vaRecipient = ""
     'If the user has canceled the operation.
    If vaRecipient = False Then Exit Sub
The following code is then used to build and send the email:
Set noDocument = noDatabase.CreateDocument
    Set obAttachment = noDocument.CreateRichTextItem("stAttachment")
    Set EmbedObject = obAttachment.EmbedObject(EMBED_ATTACHMENT, "", stAttachment)
     'Add values to the created e-mail main properties.
    With noDocument
        .Form = "Memo"
        .SendTo = vaRecipient
        .Subject = stSubject
        .Body = vaMsg
        .SaveMessageOnSend = True
    End With
     'Send the e-mail.
    With noDocument
        .PostedtodayDate = Now()
        .Send 0, vaRecipient
    End With
However, it has now been requested that a second email address (and possibly third) are added as "cc's". What would I need to add so that there are other email address that are copied into the email but don't have to be entered by the user?

Now, If you are feeling particuarly clever!

Ideally the cc'd people will depend on what the user types into another cell. How easy would it be to change the cc'd email address based upon what was entered into a cell. That is, if in cell C3 I choose from a drop down list of options and, depending on what option I picked a different email address would be added as the 'cc'?

Thanks in advance!

Chris