excel 如何实现：单元格内容一旦录入就不能修改

2024-11-01 05:50:18

推荐回答（4个）

回答1：

用VBA解决。首先将此表的宏安全性设置最低，ALT+F11打开VBA窗口，双击左边的SHEET1或THISWORKBOOK，添加代码，右键设置VBA工程属性，将工程保护用密码保护。代码实现所有的目标单元格只要不为空，就不能动。空的可以动。
代码如下：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
With Target
If .Value <> "" Then
dataN = .Value
MsgBox ("不能修改")
.Value = dataN
End If
End With
End Sub

不好意思，代码应该将目标单元格移开，防止使用右键等，我选择A1单元格。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
With Target
If .Value <> "" Then
dataN = .Value
MsgBox ("不能修改")
.Value = dataN
Cells(1, 1).Select
End If
End With
End Sub

回答2：

人家添的可以修改是你的内容不让他们修改吧

选中能让修改的----单元格设定--保护--去掉锁定

工具---保护--保护工作表输入两次密码就OK了

回答3：

设置单元格保护然后设置密码有选择用户编辑区域设置区域密码进行保护

回答4：

我看只能使用VBA了。
检查该单元格是否为空，如为空，可以更改。
如不为空，则把该单元格的属性值进行修改，使其不可操作。
哪种属性我忘了，你可从网上查一下