FormControlType Property Example

This example clears all the Microsoft Excel check boxes on worksheet one.

For Each s In Worksheets(1).Shapes
    If s.Type = msoFormControl Then
        If s.FormControlType = xlCheckBox Then _
            s.ControlFormat.Value = False
    End If
Next