ExcelcheckboxDoubleClick事件

我有一个电子表格,基本上是一个待办事项清单,检查点由checkbox标记。 checkbox的规则是:1)只有第一个checkbox(名为checkbox_1)可以先检查。 2)checkbox只能依次检查(即checkbox_1,checkbox_2,checkbox_3等)

最初除checkbox_1以外的所有checkbox都被禁用。 当一个启用的checkbox被点击时,下一个checkbox被启用并禁用前一个。

我现在遇到的麻烦是双击旁路checkbox的enabled状态,并会继续,并通过事件处理程序检查checkbox。

我怎样才能防止这个? 我是否需要在_BeforeDoubleClick事件处理程序中编写一些内容?

我的事件处理程序的checkbox_click事件在这里:

 Public Sub CheckBoxClick(Optional checkboxName As String = "") 'This calls the checkbox function to create the timestamp and enable the next visible checkbox Dim assocTime As Range Dim callerName As String Dim aCaller As Variant Dim check_num As String Dim aCheckboxes As Variant Set aCheckboxes = common.GetSheet(1).CheckBoxes If checkboxName <> "" Then callerName = checkboxName Else callerName = Application.Caller End If aCaller = Split(callerName, "_") check_num = aCaller(1) Set assocTime = common.GetRange("time_" & check_num) If assocTime.value = "" Then Call obj.ClickCheckBox(callerName, Constants.mypw) End If If check_num = aCheckboxes.count Then If MainSheetFunctions.HasRedCells Then common.MessageBox ("This batch record has cells with errors. Please address all red cells before continuing.") Exit Sub End If End If End Sub 

obj.ClickCheckBox子将在相邻的单元格中写入当前时间,并启用下一个checkbox。

感谢您的时间,