仅删除工作表保护
仅删除工作表保护
提问于 2018-10-10 15:09:00
我有保护工作簿的代码，分为三个阶段:消除保护、运行宏和再次保护。
如果客户手动选择另一个密码(他必须知道代码的密码)，则保护取消码不再有效
我怎样才能禁用取消保护的选项，这样你才能用代码取消保护，防止密码被更改？
回答 1
Stack Overflow用户
发布于 2018-10-10 22:49:47
您可以保护VBA项目，以防止用户在执行其余代码之前先查看代码，然后再查看密码中的代码(工具> VBA项目属性)
Dim password As Variant
pword = Application.InputBox("Please enter password", "Enter Password")
Select Case pword
Case Is = "superstrongpassword"
'insert code or maybe a GoTo statement?
Case Else
msgbox("Incorrect password")
Exit sub
End SelectGoTo语句会使代码难以阅读和调试，但在这种情况下，它似乎是一种简单的用法。
希望能有所帮助。
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/52734564
复制相关文章
相似问题
腾讯云开发者
