Hi there
I've got the same set of Checkboxes as you do
I read the replies and tip 44 but couldn't make so much
out of them would you be willing to help me
my code is really short :


Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
CheckBox1.Caption = "Avaliable"
End If
If CheckBox1.Value = False Then
CheckBox1.Caption = "Not Avaliable"

Dim Who, Title, Person, MyDate, When
Who = .......

I've to add this to all of my Checkboxes

Thanks!
-----Original Message-----

Thank you very much for your prompt and usefull response.
My problem regarded a userform with check boxes.
Tip 44 of the walkenbach documents was very helpfull.
Within excel there are more objects with the name
CheckBox so I have to
use msforms.checkbox, and this works great.

Harald Witmer

*** Sent via Developersdex http://www.developersdex.com
***
Don't just participate in USENET...get rewarded for it!
.