How To Use 2 Access Checkboxes Update 1 Field

Here is an answer to another interesting question which came to me involving “Access Checkboxes”.

I have created a number of yes/no instances … but when i drag in the control button it is only a button to either click or not click. I want to have a checkmark where you click yes or you have a separate check mark box for no, and this will return to the underlying table the “yes” or “no” in the proper field. Currently the checked box returns Yes and unchecked gives no, which works, but an student will be entering all the data so I need it to be as clear as possible.

OK so this post will provide some pictures covering how to do this task of adding 2 checkboxes to update 1 field.

Step 1: Table With Checkbox

Our little sample table has a checkbox:

Step 2: Check Boxes In Option Frame

Now add an option frame to your form.

An option frame will cause 1 checkbox to be deselected when another checkbox is selected.

Whatever is in the frame will work as a unit.

…and since these are unbound controls we’ll be responding to the checkbox’s “MouseDown” event (it works like the click event on Bound controls)

Step 3: Code The MouseDown Event

Here is the code you can use…

Private Sub chkNo_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Me.YesNo= False
End Sub

Private Sub chkYes_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Me.YesNo= True
End Sub

Then you can do the same for all your other access form’s checkboxes.

Hope this helps, let me know if you have any questions.

PS. I renamed “Check412” was renamed to “chkYes”, FYI.




By the way, if you got or are getting value from the VBA information, please click the "Donate" button to give me a small token of your appreciation, thanks!


These posts may help answer your question too...

Learn Access VBA: Understand Tables, Queries, Forms, and Reports

Learn Access VBA: From Zero to Database Hero If you’ve ever opened Microsoft Access and wondered how all the pieces fit together — tables, queries, forms, and reports — this tutorial is made for you. In just a few minutes, you’ll understand how Access works behind the scenes and see how VBA (Visual Basic for […]

How to Fix Run Time Error 1004 in Excel

If you work with Microsoft Excel frequently, chances ar ling for a solution. Fortunately, this error is well-documented, and there are several ways to resolve it. In this article, we’ll explore the causes of run time error 1004, practical steps to fix it, and preventive measures to reduce the chances of it happening again. What […]

Error 91 Flowchart vbahowto-com

Error 91: Object Variable or With Block Variable Not Set — Causes and Solutions

If you work with VBA (Visual Basic for Applications) in Excel, Access, Word, or other Microsoft Office programs, you’ve probably come across the dreaded Error 91 at least once: Run-time error ‘91’: Object variable or With block variable not set This error can be frustrating, especially if your code seems perfectly fine at first glance. […]

How To Escape Apostrophe In SQL Update Query

If you are looping a table with thousands of records, you’ll probably run into at least one that has an apostrophe in the field name. Like “Mike’s” or “M’cormick”, or something else. Anyway, here is one way to escape the string when you are doing your update query. Option Compare Database Sub YDriveLoop() ‘4/23/24 erik@loeblcomservices.com […]


Support these sponsors:
Previous Post

How To Have MS Access Increment A Number Without An Autonumber VBA

Next Post

VBA Debug Part 2