主题：勾选权限问题

以下代码有问题：选择其它单元格也有消息框弹出。不知错在哪？

If e.Row("实施人") = _UserName Then
    If e.Col.name = "开始" Then
        e.Row("开始") = not e.Row("开始")
    Else
        e.Cancel = True
    End If
Else
    MessageBox.Show("只有当前实施人才能勾选!","提示")
End If

 

此主题相关图片如下：snap1.jpg

已搞定

在锁表（不可编辑）状态下，想通过实施人编辑“实施人备注”列。

下面代码出现问题：其它列不可编辑了。第三行代码可能不行，不知用什么代码实现。

 

If e.Col.Name = "实施人备注" Then
    If _UserName = e.Row("实施人") Then
        e.Table.StartEditing
    Else
        e.Cancel = True
        MessageBox.Show("只有当前实施人才能编辑!","提示")
    End If
Else
    e.Cancel = True      
End If

 

此主题相关图片如下：snap3.jpg

去掉红色代码即可

我是在锁表状态下编辑，去掉红色代码就不能编辑了

只能去掉锁表状态

那不行，实施人只能编辑“实施人备注”列，不能编辑其它列。去掉量行代码，下面代码好像可以。什么道理？

If e.Col.Name = "实施人备注" Then
    If _UserName = e.Row("实施人") Then
        e.Table.StartEditing
    Else
        e.Cancel = True
        MessageBox.Show("只有当前实施人才能编辑!","提示")
    End If
End If

我测试一样不能编辑

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:test.zip