VBA受保护的工作表在“审阅”选项卡下不受用户保护

Question

我遇到了问题。每当我使用VBA代码保护工作表时如下：

表格（“SheetName”）。保护密码：= pwd

工作表确实受到保护，但是当用户进入“审核”选项卡并单击“取消保护”时，工作表可以手动取消保护。即使有一个密码，也不需要密码。 请帮忙！

Answer 1

我认为你的语法不正确。

如果pwd是您的密码值，那么您必须将其置于“像这样：

Sheets("SheetName").Protect Password:="pwd"

如果pwd是包含密码的变量的名称，请确保它不是空的，并且Password:=后面没有空白字符。

它应该是这样的：

Dim pwd As String
pwd = "pass"

Sheets("SheetName").Protect Password:=pwd