1、全局doubleClick事件是否开启
2、加入msgbox看是否进入事件
msgbox(e.table.Name)
If e.Table.name.contains("_") Then '如果比较窗口被打开并可见
msgbox(Forms("Form_ParametersCompare").Opened) If Forms("Form_ParametersCompare").Opened Then AddMaterialToCompare() e.Cancel = True '禁止进入编辑状态 End IfElse e.Cancel = True '禁止进入编辑状态
End If