Excel and Visual Basic

[arand]

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.

 

[Leith Ross]

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

 

[Norman Jones]

Hi Arand,

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

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