03版单元格禁止修改问题

cnmd709394

Excel2003 版能不能实现这样一个功能：

对单元格进行锁定保护，使空白的单元格可以自由录入数据，但填写结束后或已有数据的单元格不能修改；

若要修改，只能取消保护后再执行（最好是修改完成后再次自动保护）；

另外：表格里边会有多个公式

请问哪位大虾能解决这个问题。

roych

可以，要写代码，明天再试试。——如果禁止VBA代码运行也无法生效噢。

pureshadow

这个怎么样

1. 
   
2. 
   
3. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   
4. If Range("a1") <> "aaa" Then
   
5.     If Target <> "" Then
   
6.         Range("a1").Select
   
7.     End If
   
8. End If
   
9. End Sub
   

复制代码

roych

pureshadow 发表于 2011-1-20 12:17
这个怎么样End Sub

小妖姐姐，可能LZ想要用Protect属性来做吧。以前的电子书VBA常用技巧解析（全卷)上有，只是被当做病毒给清理了。嗯，LZ可以去Excelhome.net里下载看看。我这里网速太慢，下不了~~

pureshadow

不管黑猫白猫，逮着耗子就是好猫