Question

我在按下用于显示所需工作表的按钮或在退出工作表的箭头图标时遇到上述问题。我用于箭头图标的代码是：

Sub Hide_stock()
Sheets("Main Page").Select
Sheets("stock").Visible = False
End Sub

所有工作表均受保护。 25天内运行良好，现在出现了问题。我还通过取消保护所有的床单来检查它，但是问题仍然存在。

请解决我的问题。

Answer 1

您可能要先检查工作簿结构是否受保护

Sub Hide_stock()
Dim wkb As Workbook
    Set wkb = ThisWorkbook
    If Not wkb.ProtectStructure Then
        Sheets("Main Page").Select
        Sheets("stock").Visible = False
    Else
        MsgBox "Workbook Structure is protected. Please unprotect first." _
        , vbOKOnly, "Workbook protected"
    End If
End Sub

运行时错误'1004'无法设置工作表类的visible属性

1 个答案: