Зайдем на вкладку «Разработчик» и найдём «Свойства».
На вкладке Aiphabetic перейдем на пункт «Visible» и выберем 2 - xlSheetVeryHidden. Обратите внимание, что один Лист должен будет обязательно остаться. Открыть все Листы теперь можно с помощью макроса.
Sub Hidden() Dim wb Set wb = ThisWorkbook For i = 1 To wb.Sheets.Count Worksheets(i).Visible = True Next i End Sub
P.S. А так-же, в книгах где нет пароля на VBAProject, отобразить можно в окне редактора Visual Basic. Также выбрав Properties - Лист в свойствe Visible выбрать 1-xlSheetVisible.