Ошибка выполнения «1004» не смогла установить свойство visible класса рабочего листа

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