| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 权限 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=40639) |
| -- 作者：方沈 -- 发布时间：2013/9/25 12:38:00 -- 权限 各位：帮我再写个代码 登陆者＝“提出者”列，那么可以修改这行的A列、B列 登陆者＝“发送者”列，那么可以修改这行的C列、D列 用户组是“经理”的，可以修改所有的列
谢谢 |
| -- 作者：y2287958 -- 发布时间：2013/9/25 12:41:00 -- http://www.foxtable.com/help/index.html?n=0605.htm |
| -- 作者：方沈 -- 发布时间：2013/9/25 13:12:00 -- 好像不一样 我现在 1）建立“备忘录”表 2）增加A列、B列、提出者、C列、D列、发送者 共6列 要求 1）只有登录者的用户名＝“提出者”列时，才能编辑A列、B列 2）只有登录者的用户名＝“发送者”列时，才能编辑C列、D列 3)当登录者的用户组名＝经理时，可以编辑全部的列
谢谢支持 |
| -- 作者：方沈 -- 发布时间：2013/9/25 13:12:00 -- 好像不一样 我现在 1）建立“备忘录”表 2）增加A列、B列、提出者、C列、D列、发送者 共6列 要求 1）只有登录者的用户名＝“提出者”列时，才能编辑A列、B列 2）只有登录者的用户名＝“发送者”列时，才能编辑C列、D列 3)当登录者的用户组名＝经理时，可以编辑全部的列
谢谢支持 |
| -- 作者：Bin -- 发布时间：2013/9/25 14:21:00 -- 你好,完全一样的. 如果你参考帮助例子没办法做,说明你基础知识还没掌握踏实,那么就算现在给你写了代码也没有用, 一旦需求稍微变了一点点,经理和主任同时可以修改,你岂不是又不懂了,又要上来求助?
Select e.Col.name
Case "A列","B列" If e.Row("提出者") <> User.Name OrElse User.Group <> "经理" Then e.Cancel = True End If Case "C列","D列" If e.Row("发送者") <> User.Name OrElse User.Group <> "经理" Then e.Cancel = True End If End Select |