Найти в Дзене
ExceLifeHack

Отобразить все скрытые листы в книге Excel

Стандартными средствами Excel, открыть сразу все скрытые листы книги не получится, а так хочется. Решение перед вами.

Копируйте код и сохраните его в Личной книге макросов.

Sub ShowAllSheets()
Dim sht
'Отображаем все скрытые листы в книге
On Error Resume Next
For Each sh In ActiveWorkbook.Sheets
sh.Visible = True
Next sh
End Sub

Открыть редактор VBA Alt +F11:

Вызвать меню для выполнения или изменения макросов Alt + F8:

На выполнение макроса можно назначить "Горячие клавиши", нажав в окне Параметры:

Назначение "Горячих клавиш" на макрос
Назначение "Горячих клавиш" на макрос

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

  • Для Windows сочетание клавиш для строчных букв — Ctrl + буква. Для прописных букв — Ctrl + Shift + БУКВА.
  • Для Mac сочетание клавиш для строчных букв — Option + Command + буква или Ctrl + буква. Для прописных букв — Ctrl + Shift + буква.
  1. Макрос изменения стиля ссылок в таблицах Excel с A1 на R1C1
  2. Макрос для изменения стиля шрифта на листе Excel
  3. Макрос для сортировки ярлычков книги Excel по алфавиту
  4. Макрос сохраняющий отдельным файлом текущий лист в новую папку
  5. Макрос отображающий скрытые листы в файлах Excel, выгруженных из 1С

Интересное по теме Excel:

  • Функции Excel: ВПР (вертикальный просмотр)
  • Функции Excel: СУММЕСЛИ (суммирование по одному условию)
  • Функции Excel: СУММЕСЛИМН (суммирование по нескольким условиям)
  • Сводные таблицы в Excel: как создать?
  • Как переместить строку или столбец в Сводной таблице Excel
  • Как напечатать заголовки таблицы Excel на каждой странице
  • Как отобразить листы в файлах Excel, выгруженных из 1С
  • "Умные" таблицы в Excel
  • Как в Excel из кросс-таблицы сделать плоскую (Анпивот)
  • Мгновенное заполнение
  • Быстрое перемещение строк и столбцов
Рекомендуем почитать
Документы, вакансии и контакты