excel工作薄中工作表加密VBA设置步骤

进入后3个红的工作表要输入密码123456,正确可以进入,不正确时返回 “配置表“

编制代码时请详细说明在上图哪里填写

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
Me.Unprotect "meimima123"
Target.Locked = True
Me.Protect "meimima123"
End If
End Sub追问

弄不出来

追答

http://jingyan.baidu.com/article/09ea3ede265e8bc0aede39ba.html

温馨提示:答案为网友推荐,仅供参考
相似回答