Hello,

The follwing code works when assigned to a command button:

Code:
With Sheets("Email")
 cb1.Value = False
 cb2.Value = False
End With
But when I put the code into the workbook Open function I always get an error. I've also tried:

Code:
Dim chkBox As Object
    For Each chkBox In Sheets("Email").CheckBoxes
    chkBox.Value = False
Next chkBox
These are activex checkboxes. Thanks.