oxicottin
Learning by pecking away....
- Local time
- Today, 05:11
- Joined
- Jun 26, 2007
- Messages
- 888
Hello, I have a check box on frm_Main called chkReleaseALL and when checked I want all checkboxes on my sub form to be true if it isn't already checked which that's what I got it doing with the code below BUT what if I uncheck the checkbox (chkReleaseALL) on my main form, how do I revert/undo what was checked already or uncheck on my sub form?
Code:
Private Sub chkReleaseALL_Click()
Dim rs As DAO.Recordset
Set rs = Me.sfrm_ProductHoldData.Form.RecordsetClone
With rs
.MoveFirst
Do Until rs.EOF
.Edit
.Fields("ReleaseSingleEntry") = True
.Update
.MoveNext
Loop
End With
Set rs = Nothing
End Sub