在PrepareEdit事件中写以下代码后,不能打开文件完全不能编辑,现在要达到设计图表的审核意见判为合格后,只保留打开文件功能,要怎么写代码
If e.Row("审稿结果") = "不合格" Then '如果审批列不为空
Select Case e.Col.Name
Case "操作人及时间","审稿结果"
e.Cancel = False
Case "类别","设计图","预览图","时间","设计师","备注"
e.Cancel = True '则禁止编辑
End Select
End If