EXCEL表格，要求每个单元格实现一次输入后就无法再更改

需要用到VBA

先全选单元格，设置单元格格式的 保护 为取消状态（不锁定，不隐藏）
按 ALT + F11 ,代开代码窗口
将下面的代码复制入其中：
-------------
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
ActiveSheet.Unprotect "8888"
For Each c In Target
With c
If .Value <> "" Then
.Locked = True
.FormulaHidden = True
End If
End With
Next
ActiveSheet.Protect "8888", DrawingObjects:=True, Contents:=True, Scenarios:=True
Application.EnableEvents = True
End Sub
----------------
回到表格，设置宏 安全性为 中 （菜单 工具，宏，宏安全性……），

保存，退出，关闭所有excel，再打开刚才的表格，会提示“是否运行宏？”

选择 运行

进去到刚才的 sheet，就可以实现你要的功能了

能,但要给一定的悬赏分.不好意思