Excel vba не виден лист

Аннотация

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

Дополнительные сведения

Скрытие листа с помощью команд меню

Чтобы скрыть лист, наведите указатель мыши на пункт «Лист» в меню «Формат» и нажмите кнопку «Скрыть». Чтобы отобразить лист, наведите указатель на пункт «Лист» в меню «Формат» и нажмите кнопку «Отобразить». Выберите соответствующий лист и нажмите кнопку «ОК».

Невозможно скрыть листы модулей, так как они отображаются в редакторе Visual Basic.

Скрытие листа с помощью макроса Visual Basic

Вы также можете скрыть или отобразить лист с помощью макроса Visual Basic для приложений майкрософт. При использовании кода Visual Basic можно использовать свойство xlVeryHidden, чтобы скрыть лист и не отображать его в диалоговом окне «Отобразить». При этом единственный способ снова сделать лист видимым — создать другой макрос Visual Basic.

В макросе Visual Basic используйте свойство Visible, чтобы скрыть или отобразить лист. Для свойства Visible можно задать значение True, False или xlVeryHidden. Значения True и False имеют тот же эффект, что и при использовании команд меню «Отобразить» или «Скрыть». Аргумент xlVeryHidden скрывает лист, а также не отображает диалоговое окно «Отобразить».

Пример кода Visual Basic

Корпорация Майкрософт предоставляет примеры программирования только в целях демонстрации без явной или подразумеваемой гарантии. Данное положение включает, но не ограничивается этим, подразумеваемые гарантии товарной пригодности или соответствия отдельной задаче. Эта статья предполагает, что пользователь знаком с представленным языком программирования и средствами, используемыми для создания и отладки процедур. Инженеры службы поддержки Майкрософт могут помочь объяснить функциональные возможности конкретной процедуры, но они не будут изменять эти примеры, чтобы предоставить дополнительные функциональные возможности или процедуры создания в соответствии с конкретными требованиями. В следующих примерах показано, как использовать свойство Visible объекта Sheet.

В следующем примере показано, как использовать аргумент xlVeryHidden свойства Visible для скрытия листа:

Источник

Как скрыть листы от большинства пользователей Excel

О чем идет речь

В Excel имеется три уровня видимости листов: видимый, скрытый и очень скрытый. Видимый лист отображается в списке листов листов книги. Скрытый лист не отображается в перечне, однако его можно отобразить стандартными методами. Так называемый Очень скрытый режим, который установить и снять можно только с использованием макросов. Очень скрытые листы не отображаются в перечне листов, более того они не отображаются в диалоговом окне «Вывод на экран скрытого листа».

Так как об этом способе не знают большинство пользователей Excel, то им удобно пользоваться если необходимо спрятать часть информации.

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

Способ №1. Через надстройку VBA-Excel

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

1. Перейти на вкладку VBA-Excel (доступна после установки надстройки).
2. В меню Диспетчеры выбрать пункт Диспетчер листов.
   
3. В окне диспетчер выберите листы, видимость которых необходимо изменить и нажмите команду Видимость.​

Способ №2. С помощью свойства листов в редакторе кода

Для того чтобы скрыть лист необходимо:

1. Открыть редактор кода сочетанием клавиш Alt+F11.
2. В левом меню раскройте проект с одноименным названием вашей книги.
3. Найдите в списке объектов лист, который необходимо скрыть.
4. В списке свойств найдите свойство Visible и выберите из списка значений 2 — xlSheetVeryHidden.
   

Для отображения скрытого листа можно аналогичным способом установить значение -1 — xlSheetVisible.

Способ №3. С помощью макросов

Можно сказать, что это самый сложный способ, однако и более универсальный. С помощью программирования можно задавать различные условия скрытия листов и многое другое. Но остановимся пока только на скрытие/отображении.

1. Открыть редактор кода сочетанием клавиш Alt+F11.
2. В левом меню раскройте проект с одноименным названием вашей книги.
3. Создайте новый модуль (если его у вас еще нет), в котором мы будем писать код для скрытия листов.
4. Перейдите в модуль и вставьте в него следующий код:

Источник

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

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

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

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

1. Tools —VBAProject Properties -вкладка Protection
2. для защиты устанавливается галочка «Lock project for viewing«; для разблокировки — снимается
3. вписывается/удаляется сам пароль в полях 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 не позволит это сделать, т.к. в книге должен быть видимым хотя бы один лист.

Источник

VBA Excel. Рабочий лист (обращение, переименование, скрытие)

Обращение к рабочим листам Excel из кода VBA. Переименование листов, скрытие и отображение с помощью кода VBA Excel. Свойства Worksheets.Name и Worksheets.Visible.

Обращение к рабочим листам

Рабочий лист (Worksheet) принадлежит коллекции всех рабочих листов (Worksheets) книги Excel. Обратиться к листу можно как к элементу коллекции и, напрямую, по его уникальному имени.

Откройте редактор VBA и обратите внимание на вашу книгу в проводнике, где уникальные имена листов указаны без скобок, а в скобках — имена листов, отображаемые на ярлычках в открытой книге Excel. Уникальные имена листов отсортированы по алфавиту и их расположение по порядку не будет соответствовать их индексам (номерам), если листы перемещались по отношению друг к другу. Индексы листов смотрите по порядку расположения ярлычков в открытой книге. Переместили листы — изменились их индексы.

Обращение к рабочему листу в коде VBA Excel:

• УникИмяЛиста — уникальное имя листа, отображаемое в проводнике редактора VBA без скобок, с помощью кода VBA изменить его невозможно.
• N — индекс листа от 1 до количества всех листов в книге, соответствует порядковому номеру ярлычка этого листа в открытой книге Excel.
• Имя листа — имя листа, отображаемое в проводнике редактора VBA в скобках, с помощью кода VBA изменить его можно.

Количество листов в рабочей книге Excel определяется так:

Переименование листов

В VBA Excel есть некоторые особенности в наименовании листов, так как у рабочего листа есть два свойства, связанных с именем: (Name) и Name. Откройте окно «Properties» в редакторе VBA, нажав клавишу «F4», и выделите любой лист в проводнике. Вы увидите, что в окне «Properties» свойству (Name) в скобках соответствует в проводнике уникальное имя листа без скобок, а свойству Name без скобок соответствует изменяемое имя листа в скобках. Оба имени в окне «Properties» можно редактировать.

С помощью кода VBA Excel можно редактировать только имя листа Name, отображаемое на ярлычке листа и в проводнике без скобок. Для этого используется свойство рабочего листа Worksheets.Name со следующим синтаксисом:

expression.Name

где expression — переменная, представляющая собой объект Worksheet. Смена имени осуществляется путем присвоения нового значения свойству Worksheets.Name.

Допустим, у нас есть лист с уникальным именем (Name) — Лист1, индексом — 1 и именем Name — МойЛист, которое необходимо заменить на имя — Реестр.

Скрытие и отображение листов

Для скрытия и отображения рабочих листов в VBA Excel используется свойство Worksheet.Visible со следующим синтаксисом:

expression.Visible

где expression — переменная, представляющая собой объект Worksheet. Свойству Worksheet.Visible могут присваиваться следующие значения:

• False — лист становится невидимым, но он будет присутствовать в списке скрытых листов, и пользователь сможет его отобразить с помощью инструментов рабочей книги Excel.
• xlVeryHidden — лист становится супер невидимым и его не будет в списке скрытых листов, пользователь не сможет его отобразить. Актуально для Excel 2003-2016.
• True — лист становится видимым.

Аналоги присваиваемых значений:

• False = xlHidden = xlSheetHidden = 1
• xlVeryHidden = xlSheetVeryHidden = 2
• True = xlSheetVisible = -1 (константа xlVisible вызывает ошибку)

Источник

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

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

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

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

1. Tools —VBAProject Properties -вкладка Protection
2. для защиты устанавливается галочка «Lock project for viewing«; для разблокировки — снимается
3. вписывается/удаляется сам пароль в полях 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 не позволит это сделать, т.к. в книге должен быть видимым хотя бы один лист.

Источник