Hello,

I am trying to create a command button in Microsoft Excel (Office 2000) that
enables me to reset the check box status for a worksheet from checked to
unchecked. The worksheet contains approximately 50 check boxes and is meant
to be reused. Is this possible? If so, how can I program it to do so? Thanks.

Hello Arand,

Copy this macro into a VBA module and then attach the macro to your
command button. It will clear all chekboxes on the active worksheet
automatically.


Code:
--------------------

Sub ClearCheckBoxes()

Dim AutoShape

For Each AutoShape In ActiveSheet.Shapes
If AutoShape.Type = msoFormControl Then
If AutoShape.FormControlType = xlCheckBox Then
AutoShape.ControlFormat.Value = False
End If
End If
Next AutoShape

End Sub
--------------------


Sincerely,
Leith Ross


--
Leith Ross
------------------------------------------------------------------------
Leith Ross's Profile: http://www.excelforum.com/member.php...o&userid=18465
View this thread: http://www.excelforum.com/showthread...hreadid=555428

Hi Arand,

Assuming that the checkboxes are from the Forms toolbar, try:

'=============
Public Sub Tester()
ActiveSheet.CheckBoxes.Value = xlOff
End Sub
'<<=============


---
Regards,
Norman


"arand" <u23437@uwe wrote in message news:62531f4ca81e7@uwe...
Hello,

I am trying to create a command button in Microsoft Excel (Office 2000)
that
enables me to reset the check box status for a worksheet from checked to
unchecked. The worksheet contains approximately 50 check boxes and is
meant
to be reused. Is this possible? If so, how can I program it to do so?
Thanks.