Вопрос : Ошибка - метод видимый ого лист рабочий лист предмета

В фрагменте Кодего ниже я пытаюсь спрятать все листы за исключением вызванного одного «jane_sheet».  Проблема что workbook не выполнен обязательство для того чтобы раскрыть при все листы спрятанные за исключением предисловия определено как это:
Const WelcomePage = «гостеприимсво».
I думает что я получаю ошибку потому что он пытается спрятать предисловие сперва и после этого unhide «jane_sheet» и оно не может сделать потому что прятать предисловие сперва не вышл бы никакие листы видимым.  Все идеи на как я могу изменить это?  Спасибо! class= " ясное " >

> " codeSnippet " class=

class= " lineNumbers "

class=

1: 2: 3: 4: 5: 6:

>Case LCase " class= " id= " codeSnippet858723

class=

Ответ : Ошибка - метод видимый ого лист рабочий лист предмета

Случай LCase («jane»)
Листы («jane_sheet»). Видимо = xlSheetVisible
Для каждого ws в ThisWorkbook.Worksheets
Если LCase, то (ws. Имя) <> LCase («jane_sheet») после этого
ws. Видимо = xlSheetVeryHidden
Закончитесь если
Затем