How to set a series of listboxes?

[dave8]

I have a set of listboxes on a worksheet and have a button to clear them. That is, after listboxes have been checked, a button unchecks them. I have code that individually unchecks them: checkbox1.value = False, checkbox2.value = false.... I have about twenty checkboxes on the sheet. Is there a way to write a loop to set the values to false? This doesn't work: checkbox(i).value = false.

 

[Norie]

You have listboxes but you want to set the values of checkboxes to false?

If it is checkboxes are each of them linked to a cell?

If they are then you can just set the value(s) of the linked cell(s) to FALSE.

 

[dave8]

I used the checkboxes from the Toolbox and put them on the worksheet. I didn't link them to any cell and were freely place on the worksheet.

 

[Norie]

Which toolbox?

Form or ActiveX?

 

[tryagain]

Sub chkForms()
ActiveSheet.CheckBoxes = False
End Sub

or

Sub chkControls()
For nr = 1 To ActiveSheet.OLEObjects.Count
ActiveSheet.OLEObjects("Checkbox" & nr).Object = False
Next
End Sub