请先理解下代码。锁定单元格你为什么要这样做?
StartEdit事件
If e.Col.name = "某列" Then If vars("次数" & e.row("_Identify")) >= 5 e.Cancel = true End If vars("次数" & e.row("_Identify")) += 1End If
解锁代码
vars("次数" & Tables("表A").Current("_Identify")) = 4