想要在最后一个表中,达到以下效果:
不是录入者本人的无法编辑
如果“审查_完毕”勾选的话,未超过7天的,只能有黄检元可以编辑
但以下代码失效:
If User.Name = "黄检元" Then
If e.Row("审查_完毕") = True Then
Dim tv As Date = e.Row("日期")
Dim tp As TimeSpan = Date.Today - tv
If tp.TotalDays >= 7 Then
e.Cancel = True
End If
End If
ElseIf e.Row("录入者") <> User.Name Then
e.Cancel = True
End If
实验:用户:赵龙华 qdr216
郑凤平 qd046
不是本人的也能删掉及时审查完毕,请老师帮看看问题出在哪里?谢谢!