Thread: Excel and Visual Basic

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.

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

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.