Vba excel скрыть строки

Как скрыть пустые строки? Программное скрытие пустых строк макросом VBA

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

Как скрыть пустые строки средствами Excel?

Скрыть строки вручную

Скрыть строки используя сортировку

Если предстоит скрыть большое количество строк, искать их, что называется «глазами» очень не удобно. В этом случае можно использовать сортировку для того чтобы пустые строки сгруппировались и после этого скрыть их, выделив сразу весь диапазон либо просто вывести за пределы печати при распечатывании документа. Минусом этого метода является то, что очередность строк нарушается.

Как скрыть пустые строки средствами VBA?

Программное скрытие макросом VBA

Теперь речь пойдет о том как программно скрыть пустые строки макросом. Возьмем процедуру, при помощи которой мы уже удаляли пустые строки и внесем в её программный код небольшие изменения. Заменим команду Rows(r).Delete на Rows(r).H >

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

Автоматическое скрытие с использованием надстройки

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

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

Как скрыть строку в Excel

Здравствуйте! Подскажите, как правильно скрыть в Excel строку по условию. Если значение ячейки 0, то скрываем, в противном случае, берем следующую и проверяем. Что-то сделал, но оно не работает что-то. Дата — это именованный диапазон. На всякий случай прикладываю сам файл.

Скрыть строку в таблице Excel
Подскажите, как можно скрыть строку в таблице Excel с помощью свойства Range Hidden или каким-либо.

Как скрыть запущенный Excel от проводника?
Есть запущенный экземпляр application экселя, в нем работает «нечто» . Вопрос: что должно.

Как скрыть строку в таблице
Подскажите пожалуйста как скрыть строку в таблице. Мне нужно если Field=”” , то скрывать всю.

Как скрыть строку в DataGridView1 ?
Как скрыть строку в DataGridView1? vb.net У меня есть три вида строк. Данные о деревьях, о кустах.

Вот так перебирает, но скрывает только первую строку:

но дальше возникает вопрос, у меня в Лист3 есть ячейки:

=СЦЕПИТЬ(«Количество актов за месяц: «;A19)
=СЦЕПИТЬ(«Среднее количество актов в день (22 рабочих дня): «;ОКРУГЛ(A19/22;3))

Как узнать количество оставшихся нескрытых строк? Пробовал Offset, но там он берет предпоследнию из скрытых ячеек, а мне это не нужно.

Добавлено через 1 час 14 минут
А зачем Вам эти игры с Visible и Hidden? Но если нужно, я бы так искал скрытые и видимые в диапазоне:

Vba excel скрыть строки

Вызывать из другой подпрограммы или обработчика (пример для 1-го столбца):

VBA макрос для поиска скрытых строк и столбцов на листе Excel

Данные исходные коды VBA-макросов умеют быстро находить все скрытые строки и столбцы на листе Excel. Также они выводят всю информацию о скрытых строках и столбцах. Номера строк отображаются числами, а номера столбцов преобразуются в буквы заголовков, что очень удобно.

Как найти все скрытые строки на листе Excel с помощью макроса

У нас иметься таблица с данными по заказам, но некоторые строки листа скрыты:

Чтобы написать свой макрос откройте редактор кода макроса: «РАЗРАБОТЧИК»-«Код»-«Visual Basic» или нажмите комбинацию клавиш ALT+F11:

В редакторе вставьте новый модуль выбрав инструмент «Insert»-«Module» и введите в него этот код:

Теперь если в таблице заказов необходимо получить информацию о скрытых строках, тогда выберите инструмент для запуска макроса: «РАЗРАБОТЧИК»-«Код»-«Макросы»-«HiddenLinesInfo»-«Выполнить».

В результате после запуска макроса отобразиться сообщение с информацией о всех скрытых строках таблицы заказов.

Описание исходного VBA-кода для поиска скрытых строк

В начале данного кода объявляются сразу 3 переменные:

1. К тексту в переменной text дописывается (с новой строки) номер первой скрытой строки из текущей группы скрытых строк.
2. К тексту в переменной text дописывается двоеточие и номер последней строки из текущей группы строк. Данное значение взято из счетчика цикла текущее числовое значение в переменной i-1.
3. Удаляется значение из переменной pervoj. Таким образом создается возможность для запуска этих же операций для следующей группы скрытых строк.

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

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

В самом конце макроса вызывается сообщение в теле которого должно содержаться текстовое значение из переменной text.

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

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

В ней будет содержаться одно из двух традиционных логических значений True or Fasle (истина или ложь), в зависимости от того будет ли таблица содержать хотя-бы одну скрытую строку или нет. Далее после строки кода макроса:

дописываем инструкцию изменяющую логическое значение для переменной HidViz:

добавьте инструкции для изменения текста сообщения на альтернативный, в тому случаи если не найдено ни одной скрытой строки в исходной таблице:

If H > «На текущем листе нет ни одной скрытой строки!»

Полная версия измененного кода макроса выглядит так:

Результат действия измененного макроса в тому случаи если скрытые строки отсутствуют:

Поиск скрытых столбцов на листе Excel используя VBA-макрос

Но что если необходимо сделать так чтобы макрос показывал информацию не о скрытых строках, а и о скрытых столбцах таблицы:

пишем модифицированный код генерации сообщений с буквами для заголовков столбцов:

Код макроса для получения информации о скрытых столбцах в таблице выглядит следующим образом:

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

Таким образом мы создали новый макрос, который предназначен для работы со скрытыми столбцами. За основу использовали предыдущий код макроса.

В этот же модуль можно написать еще один 3-тий макрос, который будет вызывать поочередно эти два макроса описаны в данном примере. Одним словом, с помощью простейшего кода VBA выполним запуск двух макросов из другого макроса Excel:

Этот макрос сначала позволит нам получить всю информацию о скрытых строках, а потом и о скрытых столбцах таблицы в один клик мышкой. Теперь нам не нужно по отдельности запускать оба макроса, достаточно лишь запустить их из «РАЗРАБОТЧИК»-«Код»-«Макросы»-«HiddenLineColumnInfo»-«Выполнить».

Формы являются основными строительными блоками приложения VBA, теми окнами, с которыми взаимодействует пользователь при работе с приложением. У форм есть свои свойства, события и методы, которые позволяют управлять их внешним видом и поведением.

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

1. К тексту в переменной text дописывается (с новой строки) номер первой скрытой строки из текущей группы скрытых строк.
2. К тексту в переменной text дописывается двоеточие и номер последней строки из текущей группы строк. Данное значение взято из счетчика цикла текущее числовое значение в переменной i-1.
3. Удаляется значение из переменной pervoj. Таким образом создается возможность для запуска этих же операций для следующей группы скрытых строк.

Свойства Height (Высота) и Width (Ширина) определяют начальные размеры формы; свойства Left (Левый) и Top (Верхний) определяют местоположение формы по отношению к левому верхнему углу экрана монитора.

На Что Нужно Изменить Свойство Visible в Vba Чтобы Лист Excel Был Скрыт от Пользователей

Поговорим про то, как в VBA обращаться к листам книги Excel.

Вариант 1

Sheets(1).Cells(1,1)

Sheets(1) — это не первый лист, созданный в книге, а лист, который на панели ярлыков листов занимает КРАЙНЕЕ ЛЕВОЕ положение. То есть Sheets(2) будет указывать на второй слева лист на панели ярлыков. Если вам нужен конкретный лист, то ТАК ссылаться на него, как вы понимаете, плохая идея, ибо пользователь, изменив порядок следования листов, нарушит работоспособность вашей программы.

Во всех примерах я буду обращаться к ячейки A1, так как речь не о свойствах объекта Worksheet , а о том, какие есть способы получить синтаксическую конструкцию, указывающую на нужный нам лист.

Вариант 2

Sheets(«First»).Cells(1,1)

Вариант 3

Гораздо разумней добавить ещё один уровень абстракции и объявить константу, ссылающуюся на имя листа.

Public Const wsFirst = «First»

Sheets(wsFirst).Cells(1,1)

В случае смены имени вам придётся исправить ТОЛЬКО эту константу в начале модуля. Однако, если программа написана и сдана пользователю, а тот в один прекрасный момент берёт и переименовывает лист, то наш код тут же перестаёт работать, что, согласитесь, не слишком хорошо.

Вариант 4

Если вы удалите лист, то его CodeName повторно не будет использовано. Так вот — VBA разпознаёт имена совпадающие с CodeName листа, как объекты типа Worksheet .

Лист1.Cells(1,1) или [Лист1].Cells(1,1)

Это отличная защита от того, что пользователь перенесёт или переименует лист. Но подобные имена ни о чём не говорят нам в процессе программирования в плане того, что располагается на листе, поэтому вы будете частенько ошибаться, путая листы. А те, кто будут потом разбираться в вашем коде, тоже спасибо вам не скажут. Поэтому я предлагаю следующую модификацию этого способа:

Вариант 5

Public wsData As Worksheet

Set wsData = Лист1

wsData.Cells(1,1)

Строку 1 размещаем в объявлениях модуля. Строку 2 размещаем в обработчике события Workbook_Open . И после этого в любом месте книги мы можем использовать объявленные переменные ( wsData , строка 3). На мой взгляд, это самый удобный и продвинутый вариант из рассмотренных.

Вариант 6

Не забываем про свойство ActiveSheet объекта Application , указывающее на активный лист книги. Если вы работаете с текущим листом, то использовать его, я считаю, оптимально.

ActiveSheet.Cells(1,1)

Вариант 7

Ну и последнее, если вам передан в подпрограмму объект типа Range, то не забываем, что ссылку на лист возвращает его свойство Worksheet .

Это всё, что я имел сказать по поводу ссылок на листы в Excel VBA 🙂

0

Я раньше тоже через глобальные константы страниц имён делал, а потом увидел в коде у одного из наших сотрудников.
Сейчас так делаю:
https://fotki.yandex.ru/next/users/kokonoko/album/496947/view/1323691

0

Но CodeName нельзя исправить в окне Properties. Там через манипуляцию объектами VBA проекта это делается же.

0

0

0

0

0 Спам

0

К «Вариант 5» — я обычно переименовываю CodeName часто используемой страницы на манер имени переменной. Например CodeName «Лист1» -> CodeName «wsData» и сразу работаю с ним.

0

Всё правильно. Я, когда статью писал, тоже пытался переименовывать и с разбега почему-то не вышло, хотя действовал казалось бы по инструкциям. Где-то что-то упустил, ясное дело, но так и не разобрался в итоге

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

Как в экселе скрыть листы с паролем. Как в Excel скрывать листы и целые рабочие книги

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

Как в экселе скрыть листы с паролем. Как в Excel скрывать листы и целые рабочие книги

Итак, если вас зовут Мата Хари или Джеймс Бонд, усаживайтесь поудобнее и внимайте азам тайного и загадочного. Мы рассмотрим 2 варианта скрыть лист в Excel, это:

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

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

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

1. Вызываете контекстное меню нажатием правой кнопки мыши на том листе который вы хотите скрыть.

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

3. Для обратной процедуры отобразить скрытый лист в Excel, вы снова вызываете контекстное меню, нажав на любом ярлыке с названием листа.

4. В контекстном меню выбираете пункт «Показать» .

5. В появившемся окне списка выбора скрытых листов, выбираете нужный вам и всё снова становится видимым и доступным.

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

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

Как же собственно и происходит этот процесс, а ничего сложного в нём нет и вы сами, не зная, Visual Basic сможете элементарно это сделать, а именно сделать все шаги которые я опишу:

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

Для, вообще, конкретной надёжности вы можете защитить свой проект VBA, на функциональность — это никак не влияет. А собственно защита устанавливается так:

3. Ну и собственно записываете и удаляете свой пароль в полях «Password» и «Confirm password» .

Так же вам может быть интересны статьи о том как скрыть другие элементы Excel: « » и « ».

Ну вот и всё, в принципе, что я хотел вам рассказать!

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

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

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

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

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

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

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

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

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

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

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

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

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

Если вы работаете с большим файлом и множеством листов, то для удобства вы скрываете нерабочие листы или листы справочники. Верно? Но иногда, нужно срочно отобразить все скрытые листы. Известно, чтобы отобразить лист необходимо нажать на список листов или ярлык одного листа правой кнопкой мыши — Отобразить — Выбрать лист для отображения.

А если таких листов 10, а если 70 (у меня один раз было такое)? Как вернуть все скрытые листы сразу быстро?

Для того чтобы отобразить все скрытые листы, существует полезный макрос ()

Нажмите в открывшемся окне вставьте текст выше. Закройте окно. Вы создали . Вызвать созданный макрос можно нажав и выбрав нужный макрос из открывшегося окна.

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

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

Если и так ярлыков нет, тогда заходите: Меню Сервис — Параметры Excel — Дополнительно — Раздел Показывать параметры книги — Показывать ярлычки листов. Поставьте галку!

P.S. Не забывайте, что переключается между листами можно клавишами , это очень удобно.

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

Скрывать листы можно используя контекстное меню, вызванное правой кнопкой мышки по ярлычку листа. Как было описано в предыдущем уроке. Но листы можно скрывать так, чтобы их не было видно даже в списке скрытых листов. Причем без использования защиты структуры книги. Для реализации данной задачи нужно воспользоваться параметрами, которые доступны в режиме VBA-редактора (Alt+F11).

Как лучше скрыть лист в Excel

Для наглядности разберем пример. Скройте «Лист3» обычным способом (с помощью опции «Скрыть» в контекстном меню).

А «Лист2» скроем параметрами VBA-редактора макросов. Для этого выполним следующие действия:

В списки скрытых листов мы не видим наш «Лист3». Он надежно спрятан. Чтобы снова его увидеть нужно зайти в VBA-редактор и поменять параметры в свойстве «Visible» на «-1-xlSheetVisible».

Примечание. Третий параметр «0-xlSheetHidden» дает тот же результат что и обычное скрытие листа при помощи контекстного меню.

Полезный совет. Визуально можно скрыть ярлыки листов:

Но и в первом и во втором случаи между листами можно переключатся с помощью комбинации горячих клавиш CTRL+PageUp и CTRL+PageDown.

Полезный Лайфхак в Excel

Чтобы запретить вставку новых строк и столбцов в Excel без использования защиты листа нужно сделать так:

Вот и все теперь в лист нельзя вставить строку или столбец. Если нужно запретить вставлять только строки, тогда вводим любое значение в самую последнюю строку (например, A1048576). А если запретить вставлять только столбцы тогда вводим любое значение в последнем столбце (например, XFD1).

Надежное скрытие листов, которых нельзя отобразить стандартными средствами (опцией Показать). Полезные лайфхаки для работы с листами и ячейками.

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

VBA Использование объектов, их свойства и методы. Формы. Объектная модель FSO.

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

Строку 1 размещаем в объявлениях модуля. Строку 2 размещаем в обработчике события Workbook_Open . И после этого в любом месте книги мы можем использовать объявленные переменные ( wsData , строка 3). На мой взгляд, это самый удобный и продвинутый вариант из рассмотренных.