clear multiple checkboxes on form - newbie

[Den]

I have a form in a word document that has a lot of checkboxes. I am trying
to find a more elegant way to clear those checkboxes . Right now I can
clear them by using....

checkbox1.value = false
checkbox2.value = false
checkbox3.value = false
etc......

I have tried this, but can't get it to work

Dim mycntrl as control
For Each mycntrl In UserForm3.Controls
If Left(mycntrl.name, 8) = "CheckBox" Then
Set mychkbx = mycntrl
mychkbx.Value = False
End If
Next


Any suggestions on a better way to reset all the checkboxes to false , other
than the brute force approach????


Thanks
Dennis

 

[Peter Hewett]

Hi Den

Try the following code in your UserForm:

Dim ctlItem As MSForms.Control

For Each ctlItem In Me.Controls
If TypeName(ctlItem) = "CheckBox" Then
ctlItem.Value = False
End If
Next

HTH + Cheers - Peter

 

[Den]

Thanks Peter I will give that I try.
Dennis

Hi Den

Try the following code in your UserForm:

Dim ctlItem As MSForms.Control

For Each ctlItem In Me.Controls
If TypeName(ctlItem) = "CheckBox" Then
ctlItem.Value = False
End If
Next

HTH + Cheers - Peter