If e.Col.Name = "库存_冻结" Then \'只有经理才能冻结数据
If User.Name <> "李海荣" Then
e.Cancel = True
End If
ElseIf e.Row("库存_冻结") = True Then \'如果此行已经审批了,则禁止修改
e.Cancel = True
End If
代码2
Select Case User.Name
Case "赵燕娟" , "李海荣" , "刘春霞", "涂达莉", "开发者"
e.Cancel = False
Case Else
e.Cancel = True
End Select
代码2 的人怎么都可以操作代码1的列呢