Question

在EXCEL中怎样实现 在单元格中输入数据后就能自动保护，不能再修改，若需修改则需输入密码。

Answer 1

（1）文档在初次保存或者文档在被另存为时，都会弹出【另存为】对话框。

（2）单击【工具】按钮，在弹出的菜单中选择【常规选项】，打开【保存】对话框。
（3）在【打开权限密码】文本框中输入密码。密码可以是字母、数字和符号。密码最多只能有15 个字符。
（4）单击【确定】按钮，打开【确认密码】对话框，

（5）在【请再键入一遍打开权限密码】文本框中输入一遍密码，以确保无误。如果这里输入的密码与上一次输入的密码不同，密码将设置不成功。
（6）单击【确定】按钮，返回【另存为】对话框，再单击【保存】按钮即可。
经过上述的密码设置后，我们下一次打开文档时，就会弹出一个【密码】对话框，要求用户输入打开权限密码

Answer 2

转来的方法，请试试。
方法是有的。用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

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

追问

输入后上面显示rng(i).Locked = True代码不对 填充颜色为黄色 是什么问题？？？

Answer 3

需要用VB编程来实现，而这样操作太麻烦，你的想法是怕不小心破坏前面输入的数据，可以理解，但这样最简单的办法是限制合适的条件格式，然后再进行工作表的保护就可以了，没必要搞得那么麻烦。

追问

编程怎么用？？？？
具体步骤？？？
谢谢！！！！！！！

Answer 4

单元格中输入数据后就能自动保护?
不知道宏能不能实现。。。
excel一般都是保护整个工作表/工作簿

Answer 5

haikeone老兄的办法不错。