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.
Program Successfully in Excel! John Walkenbach's name is synonymous with excellence in deciphering complex technical topics. With this comprehensive guide, "Mr. Spreadsheet" shows how to maximize your Excel experience using professional spreadsheet application development tips from his own personal bookshelf. Check out Excel 2013 Power Programming with VBA today!
Excel allows you to fill a cell's background with just about any color you want. If you need to determine the RGB value of ...
Discover MoreNeed to know the current hour of the day? You can derive the information in your macros by using the Hour function, as ...
Discover MoreUsing a specialized calendar control is a great way to let users add dates to a worksheet. Unfortuantely, Microsoft hasn't ...
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 © 2017 Sharon Parq Associates, Inc.
Comments