Noel created a form that includes some check boxes. When someone selects the check box (so that a check appears in it), he would like to "lock" it so that the check box cannot then be unchecked.
This is very easy to do if you are using ActiveX check boxes in your form. All you need to do is remember that when the check box is clicked, an event is triggered for that checkbox. Let's say that your checkbox has a default name, such as CheckBox1. In this case, the CheckBox1_Click() event is triggered. Within the event handler, you can do just about anything you desire, including making sure that the check box stays checked.
Private Sub CheckBox1_Click()
MsgBox "ActiveX CheckBox1 Clicked"
If CheckBox1.Value = False Then CheckBox1.Value = True
End Sub
This approach works because the Value property of the check box is toggled whenever the check box is clicked. If it toggles to False (which means it is no longer checked), then you can immediately set the Value property back to True (meaning it is checked). This could be simplified a bit in this manner:
Private Sub CheckBox1_Click()
MsgBox "ActiveX CheckBox1 Clicked"
If Not (CheckBox1) Then CheckBox1 = 1
End Sub
In fact, you could simplify it even further in this way:
Private Sub CheckBox1_Click()
MsgBox "ActiveX CheckBox1 Clicked"
CheckBox1 = True
End Sub
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (13415) applies to Microsoft Excel 2007, 2010, 2013, and 2016.
Save Time and Supercharge Excel! Automate virtually any routine task and save yourself hours, days, maybe even weeks. Then, learn how to make Excel do things you thought were simply impossible! Mastering advanced Excel macros has never been easier. Check out Excel 2010 VBA and Macros today!
Do you get tired of the dialog box that says "do you want to enable macros" that is displayed when you open a workbook. ...
Discover MoreEver wonder what the macro-oriented equivalent of pressing Ctrl+End is? Here's the code and some caveats on using it.
Discover MoreMacros are great at working with text. This tip presents an example that shows this versatility by reversing the contents ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
2016-01-03 07:29:52
Les
Perhaps you mistake my comment. I mean that locking the user into a response in this way is poor practice, and should not be done!
2016-01-02 12:30:46
Robert C
Dave, undo does not work for changes done by VBA macros.
Les, the user would need to know how to stop the VBA macro execution and then bypass the resetting of the box checking.
You gain control of the VBA macro execution by pressing Ctrl-pause and then step in bypassing the checking done by the macro.
You can also open the VBA macro editor and set debug on the box checking, then you can bypass it when it gets to that step.
2016-01-02 10:27:18
Dave H.
Les - Good point. Would "Edit->Undo"(Ctrl-Z) work? The only other workaround would be to close the workbook without saving changes. This would be very cumbersome especially since you would then have to start from scratch after re-opening. Perhaps someone has a better solution...
2016-01-02 05:00:29
Les
I don't think that it is a very good idea to prevent unchecking - how does the user correct after initially checking the box in error?
Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2021 Sharon Parq Associates, Inc.
Comments