Excel макрос отобразить скрытый лист в excel - Word и Excel

В статье «Как скрыть /отобразить страницу в Excel» мы рассмотрели как вручную открыть/ скрыть лист книги, все то же самое можно сделать и написав простой VBA макрос:

Sub Макрос1 ()
ActiveWindow.SelectedSheets.Visible = False 'Прячем активный лист
Sheets ("Лист2").Visible = False 'Прячем лист с именем "Лист2", можно аналогично отобразить лист обращаясь к нему по имени, но с параметром 'true'
End Sub

Лист так же можно скрыть и вручную из редактора VBA. Зайдем в редактор (Alt+F11) и кликнув на соответствующий лист, в настройках в параметре Visible выберем интересующий нас статус видимости листа, в том числе статус «VeryHidden», который позволит убрать лист из списка скрытых листов (список вызывается из самого документа Excel при клике правой кнопкой мыши по названию листа):

Лист совсем скрыт

Будем благодарны, если Вы нажмете +1 и/или Мне нравится внизу данной статьи или поделитесь с друзьями с помощью кнопок расположенных ниже.

Источник

Суперскрытый лист

Иногда некоторые листы в книге приходится скрывать от глаз пользователей. Классический способ предполагает скрытие листа через меню Формат — Лист — Скрыть или правой кнопкой по ярлычку листа — Скрыть (Hide):

Проблема в том, что пользователь, зайдя в меню Формат — Лист — Отобразить или щелкнув правой кнопкой мыши по ярлычку любого листа и выбрав Показать (Unhide), будет видеть имена скрытых листов и понимать, что часть информации от него скрыта:

Поэтому лучше сделать так, чтобы пользователь и не догадывался о присутствии в книге каких-то скрытых листов. Для этого открываем редактор Visual Basic:

в Excel 2003 и старше — выбрав в меню Сервис — Макрос — Редактор Visual Basic (Tools — Macro — Visual Basic Editor)
в Excel 2007 и новее — нажав на кнопку Редактор Visual Basic (Visual Basic Editor) на вкладке Разработчик (Developer) или нажав ALT+F11

Ищем на экране вот такое окно:

Если его не видно, то можно его отобразить через меню View — Project Explorer (верхняя часть) и View — Properties Window (нижняя часть).

В верхней части на «дереве» находим и выделяем наш лист (на картинке — Лист1), а в нижней части находим свойство Visible (в конце списка) и делаем его xlSheetVeryHidden.

Вуаля! Теперь увидеть этот лист и узнать о его существовании можно только в редакторе Visual Basic и ни в каких окнах и менюшках Excel он отображаться не будет. Меньше знаешь — крепче спишь.

Ссылки по теме

4 уровня защиты в файлах Excel
Скрытие листов оптом с помощью надстройки PLEX

Источник

rustim86

0 / 0 / 0

Регистрация: 01.09.2015

Сообщений: 50

Скрытие/отображение рабочих листов макросом

22.01.2016, 09:26. Показов 22397. Ответов 8

Метки нет (Все метки)

Всем здравствуйте! Подскажите, пожалуйста, есть ли возможность реализовать в VBA скрытие/отображение листов по признаку закрытый лист сделать открытым, и наоборот. Или код приведенный ниже сделать как-то компактнее что ли, дабы не писать команду для каждого отдельного листа с его названием. Заранее благодарю.

Visual Basic

ThisWorkbook.Sheets("Лист1").Visible = xlSheetVisible
ThisWorkbook.Sheets("Лист2").Visible = xlSheetVisible
ThisWorkbook.Sheets("Лист3").Visible = xlSheetVisible
ThisWorkbook.Sheets("Лист4").Visible = xlSheetVisible
ThisWorkbook.Sheets("Лист5").Visible = xlVeryHidden
ThisWorkbook.Sheets("Лист6").Visible = xlVeryHidden

Казанский

15136 / 6410 / 1730

Регистрация: 24.09.2011

Сообщений: 9,999

22.01.2016, 09:50

Сообщение от rustim86

закрытый лист сделать открытым, и наоборот

Можно, но надо позаботиться о том, чтобы в любой момент хотя бы один лист был видимым.

Visual Basic

Sub rustim86()
Dim i&, c As New Collection
  For i = 1 To ThisWorkbook.Sheets.Count
    If ThisWorkbook.Sheets(i).Visible = xlSheetVisible Then
      c.Add i
    Else
      ThisWorkbook.Sheets(i).Visible = xlSheetVisible
    End If
  Next
  If c.Count = ThisWorkbook.Sheets.Count Then
    MsgBox "в книге нет скрытых листов - невозможно скрыть все листы"
    Exit Sub
  End If
  For i = 1 To c.Count
    ThisWorkbook.Sheets(c(i)).Visible = xlSheetVeryHidden
  Next
End Sub

~~Shersh~~

Заблокирован

22.01.2016, 09:52

Visual Basic

1
2
3

for each sh in ThisWorkbook.Sheets
if sh.Visible=-1then sh.Visible=2else sh.Visible=-1
next

однако хотя бы один лист в книге должен быть отображен, имейте ввиду.

0 / 0 / 0

Регистрация: 01.09.2015

Сообщений: 50

22.01.2016, 09:58

[ТС]

Казанский, благодарю!

Добавлено через 1 минуту
Shersh, да-да, я знаю, опытным путем уже узнал это И вам спасибо!

0 / 0 / 0

Регистрация: 17.03.2023

Сообщений: 9

24.03.2023, 09:46

Здравствуйте, уважаемые форумчане!
Я не программист, просто пытаюсь облегчить себе работу в excel и ищу готовые коды. В другой теме уже спрашивал, но может не в той теме задаю вопрос, поэтому нет ответа или пока некогда ответить.

Спрошу в этой теме. Как при помощи снятии галочек в ечейке с помощью кода скрывать листы с таким же именем как и в строке таблицы, ну и соответственно при установке галочки лист снова отображается. Подскажите код для файла, который приложил

АЕ

ᴁ®

3069 / 1735 / 361

Регистрация: 13.12.2016

Сообщений: 5,937

Записей в блоге: 4

24.03.2023, 10:05

Сообщение от Алик73

В другой теме уже спрашивал, но может не в той теме задаю вопрос, поэтому нет ответа или пока некогда ответить.

Может пора создать свою тему?

Добавлено через 5 минут

Visual Basic

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Cells.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("E4:E100")) Is Nothing Then
        Target.Font.Name = "Marlett"
        If Target = "a" Then
            Target = ""
            ThisWorkbook.Sheets(Target.Offset(0, -1).Value).Visible = xlVeryHidden
        Else
            Target = "a"
            ThisWorkbook.Sheets(Target.Offset(0, -1).Value).Visible = xlSheetVisible
        End If
        Target.Offset(0, 1).Activate
    End If
End Sub

Добавлено через 4 минуты
однако надо или

Visual Basic

1	On Error Resume Next

вставить, либо Range(«E4:E8») ограничить…

0 / 0 / 0

Регистрация: 17.03.2023

Сообщений: 9

24.03.2023, 11:00

АЕ, спасибо!

Просто, когда создаешь свою тему, делают замечание зачем плодить темы, если они уже есть. Задаю вопрос в теме к которой он относится.

Помогите еще, пожалуйста, что надо добавить в этот код, чтобы по снятию/установке галочки скрывались/показывались строки, с 1 по 5 например, на необходимом листе. Заранее благодарю!

ᴁ®

3069 / 1735 / 361

Регистрация: 13.12.2016

Сообщений: 5,937

Записей в блоге: 4

24.03.2023, 11:30

Сообщение от Алик73

Помогите еще, пожалуйста,

Поэтому и говорю. Создайте тему. Я же вижу, что ваша хотелка бесконечна и однообразна до безобразия.

0 / 0 / 0

Регистрация: 17.03.2023

Сообщений: 9

24.03.2023, 11:51

АЕ, пока вопрос не снят, поэтому и однообразен.
Хорошо, спасибо.

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

24.03.2023, 11:51

Помогаю со студенческими работами здесь

Разделение списка расчетных листов на листы или файлы PDF макросом
Доброго дня, форумчане! Есть такой вопрос — есть файл Excel, выгруженный из 1С, со списком…

Сбор рабочих листов из внешних файлов с последующим выполнением другого макроса
Использую прекрасный макрос с форума,-спасибо. Макрос умеет открывать много файлов "в один" — одну…

Объекты Excel VBA: рабочие листы. Примеры структур рабочих листов в приложении, их связь и изменчивость
Ребята,помогите найти информацию…ума не приложу,что нужно искать…
7. Объекты Excel VBA:…

Скрытие и отображение столбцов
Возникла такая задачка:
Есть 3 вида стоблбцов, которые чередуются (1-й вид, 2-вид, 3-й вид, 1-й…

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Источник

Пользователям известно, что в этой программе нет отдельной команды, чтобы в один клик показать все скрытые листы в Excel.

Скрыть сразу несколько листов можно очень быстро:

Выделить их с зажатой клавишей Ctrl (если листы идут не подряд) или Shift (если скрываемые листы расположены подряд),
Щелкнуть правой кнопкой мыши на одном из выделенных листов и выбрать команду Скрыть.

Но если вы захотите так же быстро показать скрытые листы в Excel — у вас не получится это сделать стандартным способом.

Отобразить скрытые листы в Excel можно следующим образом: щелкнуть правой кнопкой мыши на ярлычке одного из листов и выбрать команду Показать.

После этого откроется список скрытых листов — но показать скрытые листе таким способом можно только по одному. В этом окне не работают клавиши Ctrl и Shift.

Но что если у вас много скрытых листов? Каждый раз отображать скрытые листы в Excel по одному — муторно. Как обычно, в Excel всегда можно найти обходный путь, а данном случае даже два — с использованием макроса и без использования, для тех, кто макросов боится.

Чтобы показать все скрытые листы в excel с использованием макроса, нужно:

1. Перейти в редактор Visual Basic на вкладке меню Разработчик.

2. Если эта вкладка не видна на ленте, то ее можно отобразить перейдя на вкладку меню Файл — Параметры — Настроить ленту — установить “галку” возле пункта Разработчик.

3. В окне редактора Visual Basic нужно выбрать команду меню Insert — Module

4. В открывшемся окне модуля написать следующий код (можно просто скопировать отсюда).

Sub UnhideAllSheets()

Dim ws As Worksheet

For Each ws In ActiveWorkbook.Worksheets

ws.Visible = xlSheetVisible

Next ws

End Sub

Далее нажать сохранить (дискета) и закрыть редактор Visual Basic.

Теперь этот макрос доступен на вкладке Разработчик — Макросы.

Если нажать на кнопку Выполнить, выделив название макроса, то отобразятся все скрытые листы.

Однако, каждый раз вызывать макрос таким способом не совсем удобно.

Есть крутой лайфхак, как можно добавить этот макрос на панель быстрого доступа. После выполнения всех этапов, описанных в статье по ссылке ниже, данный макрос на панели доступа будет закреплен за определенной кнопкой, нажав на которую, можно отобразить скрытые листы.

Минус этого способа: отображаются сразу все скрытые листы, даже если для работы вам нужны только некоторые.

Плюс этого способа: если в файле добавляются новые скрытые листы, то не нужно делать дополнительных действий, чтобы отобразить скрытые листы — макрос отобразит их все, включая листы, которые были добавлены уже после записи макроса.

Способ 2. Отобразить все скрытые листы — без использования макроса

Есть еще один хитрый способ показать скрытые листы — при помощи представлений.

Инструмент Представления находится на вкладке Вид — блок Режим просмотра книги.

Чтобы добавить представление, которое будет показывать нужные вам скрытые листы в Excel, нужно сначала вручную показать эти листы (сделать не скрытыми).

После того, как вы показали все скрытые листы, в окне представлений нужно нажать кнопку Добавить.

Далее нужно задать представлению любое имя, например “Все листы”.

Теперь скроем листы и попробуем их показать при помощи созданного представления.

Откроем вкладку Вид — Представления — Выберем созданное представление — Применить.

Минус этого способа: если добавить в файл новые скрытые листы — нужно будет перезаписать представление.

Плюс этого способа: можно регулировать, какие именно листы показывать, а какие нет. Возможно создать несколько представлений, чтобы показывать разные наборы скрытых листов в excel.

В этой статье мы узнали, как показать скрытые листы в Excel.

Вам может быть интересно:

Источник

Хитрости »

Как сделать лист очень скрытым

1 Май 2011 90226 просмотров

Иногда возникают ситуации, когда надо скрыть лист со всем его содержимым от посторонних любопытных глаз. Очень часто это делается из контекстного меню листа (для счастливых обладателей 2007 Excel. Подробнее: здесь). Но при использовании данного метода необходимо защитить книгу, иначе отобразить скрытые листы сможет каждый (тем же правым щелчком мыши — Отобразить). А что делать, если книгу не надо защищать? Ведь часто необходимо оставить пользователям возможность работы со структурой книги, например, добавлять листы. Как тогда скрыть лист так, чтобы его нельзя было отобразить? Есть достаточно простой способ через редактор VBA, при этом обладать навыком программирования вообще не нужно. Итак, определились какой лист надо скрыть. Далее:

заходим в редактор VBA(Alt+F11)
жмем сочетание клавиш Ctrl+R или идем в меню View —Project Explorer (чтобы отобразить окно объектов проекта VBA)
жмем F4 или через View —Properties Window (чтобы отобразить окно свойств)
в левой части окна (в Project Explorer) ищем книгу, лист в которой надо скрыть и раскрываем её папку(на скрине это VBA Project (Книга1))
раскрываем папку Microsoft Excel Objects и выделяем там лист с нужным именем
в Окне свойств (Properties Window) находим свойство Visible и назначаем ему значение xlSheetVeryHidden

Чтобы затем отобразить этот лист необходимо свойству Visible задать значение — xlSheetVisible. При этом для отображения листа необходимо будет обязательно зайти в редактор VBA — простым методом отобразить не получится. И книгу защищать не надо. Что нам и было необходимо.
Для большей надежности можно защитить проект VBA, чтобы не было возможности отобразить лист из VBA, не указав пароль. На функционал это не повлияет совершенно.
В том же окне VBA(Alt+F11):

Tools —VBAProject Properties -вкладка Protection
для защиты устанавливается галочка «Lock project for viewing«; для разблокировки — снимается
вписывается/удаляется сам пароль в полях Password и Confirm password.

Скрыть только определенные листы активной книги можно следующим кодом:

Sub Hide_Sheets()
    Dim ws, aSheets
    aSheets = Array("Лист1", "Списки", "Лист2") 'через запятую перечисляем листы для скрытия(обязательно в кавычках)
    For Each ws In aSheets
        ActiveWorkbook.Sheets(ws).Visible = xlSheetVeryHidden
        'отобразить – xlSheetVisible; сделать лист просто скрытым -  xlSheetHidden
    Next wsSh
End Sub

Как использовать: Для начала надо убедиться, что разрешены макросы и при необходимости включить их: почему не работает макрос. Затем копируем код выше, из Excel переходим в редактор VBA(Alt+F11) —Insert —Module. Вставляем туда скопированный код. Теперь код можно вызывать нажатием клавиш Alt+F8 -выделяем Hide_Sheets —Выполнить(Run).
Скрыть все листы в активной книге, кроме листа с именем «Видимый», можно следующим кодом:

Sub Hide_All_Sheets()
    Dim wsSh As Object
    For Each wsSh In ActiveWorkbook.Sheets
        If wsSh.Name <> "Видимый" Then wsSh.Visible = xlSheetVeryHidden
        'отобразить – xlSheetVisible; сделать лист просто скрытым -  xlSheetHidden
    Next wsSh
End Sub

Скрыть абсолютно все листы не получится — Excel не позволит это сделать, т.к. в книге должен быть видимым хотя бы один лист.

Также см.:
Как сделать лист скрытым?
Изменить видимость листов
Почему нет листов?

Статья помогла? Сделай твит, поделись ссылкой с друзьями!

Источник

В этой статье представлены несколько способов шаг за шагом показать все скрытые листы и рабочие листы в Excel.

Показывать все скрытые листы по одному в Excel
Показать все скрытые листы с помощью кода VBA
Отобразить все скрытые рабочие листы с помощью Kutools for Excel одним щелчком мыши
Показать все скрытые листы с помощью функции «Переключить видимость скрытых листов»
Показать все очень скрытые рабочие листы с помощью Kutools for Excel

Показывать все скрытые листы по одному в Excel

Мы можем применить Показать функция для одновременного отображения скрытых листов в Excel. Пожалуйста, сделайте следующее:

1. Нажмите Главная > Формат > Скрыть и показать > Показать. Смотрите скриншот:
Внимание: Вы также можете щелкнуть правой кнопкой мыши любое имя листа на панели вкладок Лист и выбрать Unhide из контекстного меню.

2. Теперь все скрытые листы перечислены в Unhide диалоговое окно. Выберите лист, который вы хотите показать, и нажмите кнопку OK кнопку.

3. Затем отображается выбранный скрытый лист. Повторите шаг 2 выше, чтобы показать все скрытые листы один за другим.

Внимание: Показать все скрытые листы не так просто, как могло бы быть, хотя есть сотни скрытых листов, которые нужно показать. Возможно, вам придется щелкнуть мышью сотни раз, чтобы повторить операции. Если вы хотите получить более простой способ, сделайте его в соответствии с процедурами, которые предоставляют следующие методы.

Переключить видимость скрытых листов — один щелчок, чтобы показать все скрытые листы, и один щелчок, чтобы восстановить скрытые.

С помощью удобной кнопки переключения Worksheets предоставляемые Kutools for Excel, вы можете одним щелчком мыши отобразить все скрытые рабочие листы в активной книге и щелкнуть его еще раз, чтобы сделать все скрытые рабочие листы невидимыми.

Kutools for Excel — Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная пробная версия 30-день, кредитная карта не требуется! Get It Now

Показать все скрытые листы с помощью кода VBA

Следующий короткий код VBA также может помочь вам отобразить все скрытые листы одновременно.

1. Удерживайте Alt + F11 ключи в Excel, и он открывает Microsoft Visual Basic для приложений окно.

2. Нажмите Вставить > Модулии вставьте следующий макрос в окно модуля.

Sub UnhideAllSheets()
	Dim ws As Worksheet

	For Each ws In ActiveWorkbook.Worksheets
		ws.Visible = xlSheetVisible
	Next ws

End Sub

3, нажмите F5 ключ для запуска этого макроса. И скрытые листы отобразятся сразу.

Отобразить все скрытые рабочие листы с помощью Kutools for Excel одним щелчком мыши

Kutools for ExcelАвтора Показать все скрытые листы Функция может помочь вам легко отобразить все скрытые листы одним щелчком мыши.

Нажмите Кутулс > Показать / Скрыть > Показать все скрытые листы, см. снимок экрана:

Тогда все скрытые листы будут показаны сразу. Смотрите скриншот:

Внимание: Число, отображаемое после функции, указывает общее количество скрытых листов в вашей книге. Если скрытого рабочего листа нет, функция станет серой, и ее нельзя будет щелкнуть.

С помощью этого удобного Показать все скрытые листы вы можете отобразить все скрытые листы одним щелчком мыши в Excel. Получите бесплатную пробную версию!

Показать все скрытые листы с помощью функции «Переключить видимость скрытых листов»

Kutools for Excel также предоставляет удобный Worksheets (Переключить видимость скрытых листов), чтобы отображать или скрывать все скрытые листы одним щелчком мыши в активной книге.

Под Кутулс вкладку, нажмите Рабочий лист кнопку, чтобы отобразить все скрытые листы, и нажмите кнопку Worksheets еще раз, чтобы восстановить скрытый статус.

Worksheets переключает видимость рабочих листов. Один щелчок, чтобы отобразить все скрытые листы, и другой щелчок, чтобы скрыть их снова. Получите бесплатную пробную версию!

Показать все очень скрытые рабочие листы с помощью Kutools for Excel

Иногда вышеуказанные методы не могут отобразить скрытые рабочие листы. Это потому, что эти рабочие листы очень скрыты. В этой ситуации вы можете применить функцию «Скрыть/показать рабочие книги и листы». Kutools for Excel чтобы быстро показать их.

1. Нажмите Кутулс > Показать спрятать > Скрыть / отобразить книги и таблицы.

2. В диалоговом окне «Скрыть / отобразить рабочие книги и листы» щелкните, чтобы выбрать активную книгу, и щелкните значок Показать все в Листы раздел. Смотрите скриншот.

Теперь все скрытые листы, включая очень скрытые, отображаются массово. Пожалуйста, закройте диалог, как вам нужно.

Скрыть / отобразить книги и таблицы скрыть или отобразить сразу несколько открывающихся книг и их рабочих листов сразу, в том числе очень скрытые. Получите бесплатную пробную версию!

Отобразить все скрытые рабочие листы с помощью Kutools for Excel одним щелчком мыши

Статьи по теме

Скрыть другие листы
Скрыть другие книги
Показать все скрытые книги
Показать скрытые диапазоны (столбцы и строки)

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

Источник

Для того чтобы можно было скрыть информацию от посторонних глаз, а может быть и от своих собственных, в Excel 2007 и выше предусмотрена возможность скрывать листы. При этом можно делать листы рабочей книги как скрытыми, так и очень скрытыми, а при необходимости делать их вновь видимыми, то есть отображать (показывать).

Как сделать лист скрытым?

Сделать лист скрытым очень просто, для этого нужно кликнуть правой кнопкой мыши по ярлычку нужного листа и в появившемся контекстном меню выбрать пункт «Скрыть». Для того чтобы скрыть несколько листов, следующих подряд, либо все листы, кроме активного (книга должна содержать не менее одного видимого листа) необходимо кликнуть левой кнопкой мыши по первому нужному листу, затем, удерживая клавишу Shift, кликнуть по последнему, после чего кликнуть правой кнопкой мыши в области выделенных листов и выбрать пункт «Скрыть» из контекстного меню. Все выделенные листы разом становятся скрытыми. Аналогичным образом можно выборочно выделить листы, используя клавишу Ctrl вместо клавиши Shift.

Как сделать лист очень скрытым?

Листы рабочей книги можно сделать очень скрытыми. Такие листы невозможно отобразить стандартными средствами Excel, при вызове контекстного меню пункт «Отобразить…» (в некоторых версиях он называется «Показать…») не активен. Чтобы сделать лист очень скрытым, необходимо перейти в редактор VB (Visual Basic), сделать это можно разными способами, но самый простой — сочетанием клавиш Alt+F11, выбрать в VBA проекте рабочей книги нужный лист, а затем в свойстве «Visible» этого листа выбрать параметр «xlSheetVeryHidden».

Чтобы вернуть листу видимость, необходимо изменить свойство «Visible» обратно на xlSheetVisible.

Как отобразить скрытые листы?

Обратная процедура, когда возникает необходимость скрытые листы отобразить и сделать видимыми, может потребовать большого терпения. Чтобы отобразить скрытые листы нужно кликнуть правой кнопкой мыши в области имен листов и выбрать пункт меню «Отобразить…».

После этого появляется окно со списком скрытых листов и вывод на экран скрытых листов происходит путем выбора одного листа из всего списка. Отобразить их все разом не получится.

Делать листы видимыми придется по одному. Отображение даже десяти скрытых листов будет вполне утомительным занятием, не говоря уже о большем их количестве.

Что делать если скрыть или отобразить лист не получается?

Если установлена защита структуры рабочей книги, то пункты «Скрыть» и «Отобразить» контекстного меню будут неактивными. Для того чтобы производить какие-либо действия с листами, необходимо снять защиту книги.

Отображение всех листов, выборочное отображение и скрытие листов по маске

Представленная ниже надстройка для Excel позволяет облегчить и ускорить некоторые манипуляции, совершаемые с листами рабочих книг. Надстройка позволяет:

1) Делать скрытыми все листы, кроме активного;

2) делать очень скрытыми все листы кроме активного;

3) отображать все скрытые листы разом, не зависимо от того скрытые они или очень скрытые;

4) скрывать и отображать листы по маске, используя специальные символы совпадения для имен листов.

Видео по работе с надстройкой

макрос (надстройка) для быстрого скрытия и отображения листов

Другие материалы по теме:

Источник