主题：[求助]单击逻辑列其值不变

我也没有看明白你的问题。

你最好提炼出问题，做成一个简单的例子后发上来，然后说明你需要的是什么，设置了什么代码，现在卡在那里。

PrePareEdit事件改为：

If e.Col.Name = "分部审批" Then
    If User.Group <> "管理组" Then '只有管理组成员才能审批
        e.Cancel = True
    Else
        If e.Row("分部审批") = True Then '如果此行已经审批了,则禁止修改
            e.Cancel = False
            e.Row("审批时间") = Date.Today.Now()
            e.Row("审批人") = User.Name
        Else
            e.Row("审批时间") = Nothing
            e.Row("审批人") = " "
        End If
    End If
Else
    e.Cancel = True
End If