主题：怎么样锁定单元格

StartEdit

开始编辑的时候执行

Select case e.Col.Name 

    Case "第一列","第二列","第三列"

     If e.Row("审核") = True Then
        e.Cancel = True '取消编辑
        Messagebox.Show("已经审核，不可以修改！","提示",MessageBoxButtons.OK, MessageBoxIcon.Information)
     End If

End Select