CheckAll Checkbox (1 Viewer)

P

PWORTHY

New member

Local time

Yesterday, 19:59

Joined

Jul 17, 2014

Messages

7

• Sep 24, 2014

• #1

:banghead:

I have a filtered subform that has a check box on each record. I want to be able to use an unbound checkbox to select all and have that selection updated in the table for each associated record. Any suggestions?

:banghead:

 

spikepl

Eledittingent Beliped

Local time

Today, 02:59

Joined

Nov 3, 2010

Messages

6,142

• Sep 24, 2014

• #2

Loop over the subform's recordsetclone. Set the value of the field bound to each record's checkbox as desired

 

P

PWORTHY

New member

Local time

Yesterday, 19:59

Joined

Jul 17, 2014

Messages

7

• Sep 24, 2014

• #3

I have tried the following, but I can't get it to work:

Private Sub cmdMark_Click()
Dim rst As Recordset, i As Integer
Set rst = Me.RecordsetClone
i = 0
rst.MoveFirst
Do While Not rst.EOF
i = i + 1
rst.Edit
If rst![Ckbx2] Then
rst![Ckbx2] = False
Else
rst![Ckbx2] = True
End If
rst.Update
rst.MoveNext
Loop
MsgBox i & " Records Marked."
rst.Close
Set rst = Nothing

End Sub
Run-time error '3265':
Item not found in this collection.

highlights:
If rst![Ckbx2] Then

Do you see something wrong?

 

Last edited: Sep 24, 2014

spikepl

Eledittingent Beliped

Local time

Today, 02:59

Joined

Nov 3, 2010

Messages

6,142

• Sep 24, 2014

• #4

Run-time error '3265':
Item not found in this collection.

Click to expand...

Translated into English: WTF is ckbx2?

Your subform does not have any field in its recordset named like that.

 

P

PWORTHY

New member

Local time

Yesterday, 19:59

Joined

Jul 17, 2014

Messages

7

• Sep 24, 2014

• #5

OK.. now I feel like an idiot!!! LOL
Ckbx2 = CheckBox2, I was trying to use the checkbox instead of the actual name of the field. one of the "Duh!" moments!! Thanks!!!!!!!