取消保护在 excel 2013 中不起作用答案

【问题标题】：Unprotect not working in excel 2013取消保护在 excel 2013 中不起作用
【发布时间】：2016-05-04 12:49:34
【问题描述】：

我有一个宏可以取消保护工作表并进行一些计算并在计算后保护工作表。

Sheets("test").unProtect Password:="aaaa"

'calculation

Sheets("test").Protect Password:="aaaa", AllowFormattingcells:=true

它在 excel 2010 中工作正常，但在 excel 2013 中工作表并非不受保护并引发错误。

我不知道我犯了什么错误？请帮我摆脱这个？

【问题讨论】：

标签： excel vba

【解决方案1】：

密码应如下所示，请尝试以下代码..

Sheets("test").unProtect "aaaa"

Sheets("test").Protect "aaaa"

【讨论】：

【解决方案2】：

您可以尝试以下代码：

Sub sheetUnprotect()
    ThisWorkbook.Sheets("test").Unprotect "aaaa"
End Sub

【讨论】：