[AccessD] Check Box - "Select All"

Hi Nanette

You could use DAO and update the recordset of the form:

  Dim rst As DAO.Recordset

  Set rst = Me.RecordsetClone
  If rst.RecordCount > 0 Then
    rst.MoveFirst
    While Not rst.EOF
      rst!chkSelect.Value = True
      rst.MoveNext
    Wend
  End If
  rst.Close
  Set rst = Nothing

/gustav

>>> nanette.j.gould at Vanderbilt.Edu 22-08-2006 20:32:01 >>>
Unfortunately, this approach doesn't work. For the form's recordset I'm
querying records where the check box value is False. That's maybe 100
out of 4000 records. If I run a query to set those values to True then
the refreshed form would load all 4000 records. I need to keep their
existing recordset after they've done a Select All. The records they
select get exported to Excel for upload into our GL.


Thanks,
Nanette

-----Original Message-----
From: accessd-bounces at databaseadvisors.com 
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bobby Heid
Sent: Tuesday, August 22, 2006 1:16 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Check Box - "Select All"

OTOMH, I'd run an update query against the underlying table and then
refresh the form.

Bobby

-----Original Message-----
From: accessd-bounces at databaseadvisors.com 
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gould,
Nanette
Sent: Tuesday, August 22, 2006 2:03 PM
To: Access Developers discussion and problem solving
Subject: [AccessD] Check Box - "Select All"


I have a continuous form with a bound check box on each record. I'd like
to give the user a "Select All" option at the top and set the value of
each record's check box to True if they click Select All.
 
It seems like this must be fairly simple but I've never had to do it
before. Any suggestions?
 

Nanette