Find attached a sample code which will check whether checkbox is selected or
not. If selected then get caption of checkbox and store in string.

Sub Chk()
Dim strSender As String

If Sheet1.CheckBox1.Value = True Then
strSender = Sheet1.CheckBox1.Caption
End If
If Sheet1.CheckBox2.Value = True Then
strSender = strSender & ";" & Sheet1.CheckBox2.Caption
End If

End Sub

Later, you can use string "strSender" to send mail

Outmail.to = strSender

I suggest you to used listbox or combobox if you have too many selection.
------------------------------------------------------------------------------------
"Francois via OfficeKB.com" wrote:

I am using a macro (by Ron de Bruin ---thanks Ron) which sends a Lotus E
Mail to various people...No problem so far..
But I would like to be able to have a checkbox that will allow me to pick who
to send to, instead of hardcoding the names in as I do at the moment.

My checkbox skills are nil.

could anyone point me in the right direction.

Thanks in advance

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200704/1