Hi,
It depends on the type. From the 'Forms' toolbox
Sheets("Sheet1").CheckBoxes("Check Box 1").Value = xlOff
or to un-check them all
Sheets("Sheet1").CheckBoxes.Value = False
If they are from the Control toolbox
Sub Control_Toolbox()
'Control toolbox
Dim ws As Worksheet
Dim obj As OLEObject
Set ws = Sheets("Sheet1")
For Each obj In ws.OLEObjects
If TypeName(obj.Object) = "CheckBox" Then
obj.Object.Value = False
End If
Next obj
End Sub
You could put these in the before colse workbook event.
Mike