保存表单保护密码

Question

我的一位用户负责一个Excel表，该表也由他的下属使用。他希望他们只能编辑前几列。编辑其他列应受密码保护。

我向他展示了如何锁定/解锁单元格以及如何保护/取消保护工作表，但他并不满意：如果他取消保护它以编辑某些内容，则必须在关闭之前再次保护它（否则它将在打开时不受保护下一次）。但他不想每次都输入密码。

有没有办法保存最初输入的密码？

基本上，他只想在取消保护时输入密码。保护文件应该只需单击一次，或者在关闭时自动保护。

Answer 1

您可以使用VBA在每次保存工作簿时使用工作簿的保存前事件自动保护工作簿，如下所示：

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  Thisworkbook.Protect("Password", true, false)
End Sub 

请记住密码投影VBA项目代码，否则密码将对所有人可见。