Linking macros to checkboxes selected on an Access form

**ADezii** · Dec 1 '10, 02:13 AM

Hello Emma, actually there is a very simple solution to your problem, as long as you perform 3 Steps exactly. For this Demo, I'm assuming that you are using 10 Check Boxes, but the actual number is irrelevant, as long as you do not exceed the limit of Controls on a Form. Follow the Steps below precisely:

Name your Check Boxes sequentially, as in: chk1, chk2, chk3...chk10.
Name you Macros in similar fashion as in: Macro1, Macro2, Macro3...Macro1 0.
Make sure the Labels for you Check Boxes are in sync with the Macro being called, as in: If Check Box #4 is the only one selected, and then Macro4 will run. Be sure the actual Query that Macro4 will Output is reflected in the Label for Check Box 4 (chk4).

When all is done, execute the following Code which will Execute the corresponding Macro for each Check Box selected:

Code:

Dim ctl As Control
Dim intCtr As Integer

For Each ctl In Me.Controls
  If ctl.ControlType = acCheckBox Then
    intCtr = intCtr + 1
      If ctl.Value Then
        DoCmd.RunMacro "Macro" & CStr(intCtr)
      End If
  End If
Next

Any questions, feel free to ask.

Linking macros to checkboxes selected on an Access form

Linking macros to checkboxes selected on an Access form

Comment