Email using criteria

[jmhicsupt]

I want to add a criteria to the below code. Right now it is sending only to one recipient, which is fine. However, when a particular checkbox is checked, I want to also send to the department manager for that particular checkbox. So if ckbox1=True, then in addition send the email to: "jackdoe@yahoo.com".

Private Sub txtbccx_AfterUpdate()
If txtbccx = "Oranges" Then
[txtBCC] = "johndoe@yahoo.com"
End If
If txtbccx = "Peaches" Then
[txtBCC] = "suzyq@yahoo.com"
End If

End Sub

How would I put that additional criteria here?

Thanks in advance.

 

[ZmrAbdulla]

Here is how checkboxes defined

Private Sub MychkBox_AfterUpdate()
    If Me.MychkBox.Value = True Then
        Me.MyTextBox = "Info1"
    Else
        Me.MyTextBox = "Info2"
    End If
End Sub

________________________________________________________
Zameer Abdulla
Help to find Missing people
My father was a realistic father; not a vending machine dispense everything I demanded for!!

 

[JoeAtWork]

I believe you can just separate the list of recipients with a semicolon, so as follows (untested code, just doing this off the top of my head):

If ckbox.Value = True Then
   txtBcc = txtBcc & ";jackdoe@yahoo.com"
End If