Perhaps this code will help... I have created a subroutine that selects or deselects all checkboxes on your form. Here is the code you can paste into a blank section in your Form's code module and put it to use right now:
Code:
Public Sub ToggleCheckboxes(strSelectOrDeselect As String)
Dim ctrl As Control
For Each ctrl In Me.Controls
If TypeOf ctrl Is CheckBox Then
If strSelectOrDeselect = "Select" Then ctrl.Value = True
If strSelectOrDeselect = "Deselect" Then ctrl.Value = False
End If
Next
End Sub
Going forward, all you need to do is write one simple line of code to either select or deselect every checkbox on that form. Below is an example of just that using command buttons. You can easily adapt this logic to your checkbox event handlers.
Code:
'Both of these command buttons call on the above Subroutine to select/deselect all checkboxes.
Private Sub cmdDeselectAll_Click()
ToggleCheckboxes "Deselect" 'This button deselects everything.
End Sub
Private Sub cmdSelectAll_Click()
ToggleCheckboxes "Select" 'This button selects everything.
End Sub
Hope it helps.