I've read through a number of discussions in different forums on this topic, but there's something that I'm not getting to make my project work. So I'm including a link to illustrate my problem. My goal is to count only those checkboxes that appear on the form to get the "total checkboxes" and count only those checkboxes that are checked (selected) on the form to get the "selected checkboxes count". This is because the next part of my project's development involves cycling through all shown selected records to send email, but I'm not there yet. The emphasis is to count what is on the form only, because what shows up on the form and what remains in the table are different.

If someone can tell me of another way, I'm open to suggestions. The queries and filters that I've used with a date range somehow give this difference between selected checkboxes on the form verses on the recordsource table.

Right now my design counts directly from the recordsource, which gives me an incorrect count. See linked sample to examine what I have so far and let me know if what I'm asking can be done. The problem comes when I add a date range and the count doesn't change. I've created a code that I think more closely takes information directly off of the form, but I still need someone's help. The Public Function CheckboxOnForm() give me an error. Download the file from http://www.utteraccess.com/forums/do...?Number=668080


Thanks,
PC

Were ever you need that information, you collect it easily by sending a SQL string with the condition.
For example:
In a subform, you set the RecordSource property to the condition you need and you get only the records that meet that same condition.

If your problem is how to work the string in VBA, that then is more specific.
If that is the case, let me know.

I could not see your linked sample for it asked me to sign in to something

I saw your project.

Two questions.

Do you need the autoNumber field?
Because if you don't, remove it right away.

[quote]Right now my design counts directly from the recordsource, which gives me an incorrect count.[\quote]

Were is the count incorrect?

1 correction
RecordSource is a property of the Form and Report objects.
You can use the RecordSource property of the subform to specify the source and criteria of data for your needs.
What your doing now, which is also fine, is:
you are specifying in the Control Source property of a text box a simple count with a condition.
But it also ends there.

1 Idea
What I think you need now is to use the RecordSource property of the subForm with more creativeness.

To count the number of checkboxes that are ticked in a form:


Dim ctlControl as Control, bytCount as Byte

bytCount = 0
For Each ctlControl in Me
    If ctlControl.ControlType = acCheckBox Then
        bytCount = bytCount + Abs(ctlControl)
    End If
Next ctlControl


This works because a checkbox is either true (-1) or false (zero). So all the true ones will increase the counter by one.


Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division

Thanks for your help. For others interested in this solution, I'm posting the working sample that I've developed. I'm providing a link, because I don't see a way to upload the file to this forum.
http://www.utteraccess.com/forums/sh...0958&bodyprev=

PC