Clear check boxes?

  • Thread starter Thread starter Geoff
  • Start date Start date
G

Geoff

Excel 2007:

I have a sheet that has oodles of check boxes. Is there a simple way to
automate resetting the values of them to zero. The check boxes are not tied
to any cell value.
 
Geoff,

How depends on which toolbox you used, here's both ways

Sub Test()
'from the Controls tolbar
Dim obj As OLEObject
For Each obj In ActiveSheet.OLEObjects
If obj.progID = "Forms.CheckBox.1" Then
obj.Object = False
End If
Next obj
End Sub

Sub Test2()
'from the Forms tolbar
Dim obj As CheckBox
For Each obj In ActiveSheet.CheckBoxes
obj.Value = False
Next obj

End Sub


Mike
 
Back
Top