Excel只好输入不能修改
Excel只能输入不能修改
一、选择需要加密的单元格，右键→设置单元格格式→保护→锁定；
二、按Alt+F11键进入VBE环境，在左侧的相应sheet名称上（如sheet1）右键→查看代码；
三、选择Worksheet的SelectionChange事件，写入如下代码：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
With Target
If .Value <> "" Then
PW = InputBox("要修改内容，请输入密码！")
If PW <> "123" Then
Cells(1, 1).Select
Else
Exit Sub
End If
End If
End With
End Sub