以文本方式查看主题 - 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 |
-- 作者: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 |