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

2024-12-26 09:10:51

推荐回答（3个）

回答1：

给你个有点投机取巧的方法，用的不是工作表保护命令实现的。代码如下：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim a As Range
If Target.Count = 1 Then
       If (Target.Column = 1 Or Target.Column = 2) And Target.Value <> "" Then
        MsgBox ("禁止修改数据")
        Cells(Target.Row, 3).Select
    End If
Else
Set a = Target
    If a(1, 1).Column < 3 Then
        MsgBox ("禁止选择包含AB两列的多个单元格")
        Cells(a(1, 1).Row, 3).Select
    End If
End If
End Sub

附件中的文件供你参考。如有问题请继续追问。

回答2：

录入数据后自动保护，用事件命令

回答3：

录入就不能修