在EXCEL中怎样实现 在单元格中输入数据后就能自动保护，不...

用数据有效性就能解决,例如;A1单元格的数据有效性设置为B1="",B1单元格的数据有效性设置为A1="",你只能在A1或B1任一个单元格中输入数据而不能两个都输入数据

转来的方法，请试试。
方法是有的。用VBA解决。
工作表保7a64e59b9ee7ad94339护密码: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

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

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

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

输入数据知（或修改）后自动保护单元格：
首先保证你的可输入的道单元格是未被锁定的，按下面操作即可：

菜单内-工具-宏-Visual Basic编辑器，粘贴下面代码：
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect "pw"
Target.Locked = True
ActiveSheet.Protect "pw"
End Sub

上面假设工作表保护密码为pw，如果没有密码，把上面的容"pw"去掉。