Question

非高手免进！！EXCEL中,如何设置一旦在单元格内输入新数据后就自动受密码保护不能作修改

因工作需要，为防止他人修改，我需要在EXCEL表格中一旦录入新的数据后，该数据就受密码保护不能作修改，原来设置的：工具/单元格/保护/取消锁定，然后再在工具保护工作表，这种方法只能保护原来的数据，输入的新数据如果不重新设置仍然不能自动受密码保护，现在要求：一旦在单元格中录入新数据不需再作设置能马上自动受密码保护，请高手帮忙解答该问题！如能成功解答该问题者可得悬赏分20分。谢谢!!
有些人的回答等于没回答，有些回答又太复杂了，没想到，这个问题居然没有个简单有效的解决办法

Answer 1

方法是有的。用VBA解决。
工作表保护密码:123 你可以在代码中自己更改
工作表中只要单元格不为空程序就会锁定保护单元格
右键单击工作表标签，在右键菜单中选择“查看代码”，然后在出现的工作表代码编辑窗口复制粘贴以下代码：

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
If Target.Count = 1 Then
Unprotect Password:=123
Cells.Locked = False
Set rng = UsedRange
For i = 1 To rng.Cells.Count
If rng(i) <> "" Then
rng(i).Locked = True
End If
Next
Protect Password:=123
EnableSelection = xlUnlockedCells
End If
End Sub

另外说明：如果要修改原有数据是要解除工作表保护后才能修改。

Answer 2

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
ActiveSheet.Unprotect password:="yzv"
If Target.Value <> "" Then Target.Locked = True: Target.Interior.ColorIndex = 6
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, password:="yzv"
End Sub

注意：先全选工作表，格式－单元格－保护－锁定的勾勾去掉。
密码：yzv你自己可以更改，但要记住。两处要同时更改，改要一样的改。

Answer 3

同意二楼的看法，你所需要的无非是先取消保护，待录入后再设置保护即可。只需2步

Answer 4

你需要的专业的版本控制软件来实现这个功能。

VSS或者subversion 都可以。

Answer 5

估计比较困难，因为电脑并不能判断你就是主人，要么整体保护，要么整体取消保护，不可能随时保护。这在逻辑上都是矛盾的。如果你能输入，那电脑就必须同意别人可以输入，电脑确认你身份的唯一途径就是密码，你想不输入密码解锁又要输入那是不可能的。