Noel创建了一个包含一些复选框的表单。当某人选中复选框（以便在其中出现复选框）时，他想“锁定”

以便不能取消选中该复选框。

如果您在表单中使用ActiveX复选框，这非常容易做到。您需要做的就是记住，单击复选框时，将为该复选框触发一个事件。假设您的复选框具有默认名称，例如CheckBox1。在这种情况下，将触发CheckBox1_Click（）事件。在事件处理程序中，您可以执行所需的任何操作，包括确保复选框保持选中状态。

Private Sub CheckBox1_Click()

MsgBox "ActiveX CheckBox1 Clicked"

If CheckBox1.Value = False Then CheckBox1.Value = True End Sub

这种方法之所以有效，是因为每当单击复选框时，复选框的Value属性都会被切换。如果将其切换为False（表示不再选中），则可以立即将Value属性设置回True（表示选中）。可以这样简化：

Private Sub CheckBox1_Click()

MsgBox "ActiveX CheckBox1 Clicked"

If Not (CheckBox1) Then CheckBox1 = 1 End Sub

实际上，您可以通过以下方式进一步简化：

Private Sub CheckBox1_Click()

MsgBox "ActiveX CheckBox1 Clicked"

CheckBox1 = True End Sub

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本提示（13415）适用于Microsoft Excel 2007、2010、2013和2016。