以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  【求助】取消单元格的录入,并请教条件判断对不对?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=95173)

--  作者:yeshuping5045
--  发布时间:2017/1/12 10:01:00
--  【求助】取消单元格的录入,并请教条件判断对不对?
父表(结算总表)第1列(制单员,字符型),第2列(审核人,字符型),首先需要审核人不能和制单员一致,而且审核人的权限必须在(业务审批组),否则取消审核人的修改单元格(不是修改行),在PrepareEdit事件中录入代码,请教红色的部分如何编写


If e.Col.Name = "审核人" Then 
    If  e.Row("审核人") = e.Row("制单员") And e.Row("审核人").Group <> "业务审核组" Then
             e.?????
             msgbox("此单审核人,必须有权限,并且不能和制单员一致!")
    End If
End If


--  作者:有点色
--  发布时间:2017/1/12 10:53:00
--  

要写到startEdit事件

 

If e.Col.Name = "审核人" Then
    If e.Row("审核人") = e.Row("制单员") OrElse user.Group <> "业务审核组" Then
        e.cancel = True
        msgbox("此单审核人,必须有权限,并且不能和制单员一致!")
    End If
End If


--  作者:yeshuping5045
--  发布时间:2017/1/12 14:01:00
--  
我写了这样一个代码,审核人(字符型)如果和制单员(字符型)内容一致一样,就取消审核人单元格,结果发现审核人的录入一旦和制单人一致,审核人并没有被取消,一开鼠标后,审核人单元格不能修改,被锁定,请帮帮忙吧!

If e.Col.Name = "审核人" Then
    If e.Row("审核人") = e.Row("制单员") Then
        e.cancel = True
    End If
End If

--  作者:有点色
--  发布时间:2017/1/12 14:12:00
--  

If e.Row("审核人") = e.Row("制单员") Then

 

改成

 

If user.name = e.Row("制单员") Then