无法在Excel中显示受保护的工作表

Question

我使用以下代码保护了几张隐藏的表格（仅作为示例）：

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="something", UserInterfaceOnly:=True

不幸的是我无法将隐藏和保护的工作表变为可见，我得到了相应的错误'1004'。如何使用VB解决这个问题？转换可见表格的代码是：

For I = 3 To 7

Worksheets(I).Activate
Sheets(I).Visible = xlSheetVisible

Next I

可以在不取消保护纸张的情况下使其可见吗？