I have the email addresses being populated on a sheet called "Hidden Tab" in
Column "A"
--
Sony


"Ron de Bruin" wrote:

You can loop through your checkboxes and check the value
If the value = true then add the mail address you have in a worksheet cell ? to the array

See the example how I fill a array here with addresses in a range
http://www.rondebruin.nl/mail/tips1.htm
"Send only to the visible Addresses in column C"

If you need help to adapt it post back and tell where you have the addresses


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Sony" wrote in message ...
I have looked through several posts and on the ron bruin sites trying to find
the answer to my question. I currently have a workbook in which a user
submits a document to us by clicking a command button. All is working well
here because I am using an array with all the email addresses.

What I want to do to try & minimize the amount of people and the amount of
emails people are receiving is to open a userform and have checkboxes. Each
checkbox would be tied to an email address or group of email addresses.
Based on one or more of these being true, when the users would click on the
command button it would automatically send an email with the workbook
attached as I am doing now. I am not sure if the code I am currently using
can be modified to do this or if I have to start from scratch again. Below
is the current code I am using:

Private Sub CommandButton1_Click()
Dim Msg, Style, Title, Response
Msg = "Request Denied"
Style = vbYesNo + vbCritical + vbSubReq
Title = "Request Denied"
Response = MsgBox(Msg, Style, Title)
If Response = vbYes Then
ActiveWorkbook.SendMail "), ("Request Denied by")
MsgBox ("The Denied Notification has been sent")

Thank you in advance for your help.
--
Sony