Скрывать строки, если в выпадающем списке ничего не выбрано

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Скрывать строки, если в выпадающем списке ничего не выбрано (Формулы/Formulas)

Voyum

Дата: Вторник, 28.04.2015, 21:21 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 5

Репутация: 0 ±

Замечаний: 40% ±

Excel 2010

Подскажите, пожалуйста:
Как сделать так, чтобы при выборе из выпадающего списка пустой ячейки, скрывались определённые строки?
Дело в том, что у меня на листе несколько таблиц с заголовками. Заголовки я выбираю из выпадающего списка. Но иногда не все таблицы мне нужны, поэтому я хочу скрывать строки той таблицы, где в заголовке выбрана пустая ячейка из выпадающего списка.
Во вложении файл-пример с примечанием.
Заранее благодарен!

К сообщению приложен файл: _Microsoft_Exce.xlsx (10.7 Kb)

Ответить

Samaretz

Дата: Среда, 29.04.2015, 07:04 | Сообщение № 2

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 223

Репутация: 63 ±

Замечаний: 0% ±

Excel 2010; 2013; 2016

Только макросом (формулой скрыть ячейки невозможно):
[vba]

Код

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Select Case Target.Address
Case "$B$2", "$B$8", "$B$14"
   For i = Target.Row + 1 To Target.Row + 5
     Sheet1.Rows(i).EntireRow.Hidden = Sheet1.Cells(Target.Row, 2) = ""
   Next i
End Select
End Sub

[/vba]Код работает для всех трех заголовков, если для какого-то заголовка процедуру скрытия / отображения строк выполнять не требуется, то удалите его адрес после оператора Case.

К сообщению приложен файл: _Microsoft_Exce.xlsm (17.5 Kb)

Ответить

Voyum

Дата: Среда, 29.04.2015, 11:43 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 5

Репутация: 0 ±

Замечаний: 40% ±

Excel 2010

Samaretz, Спасибо большое!!!

Ответить

Скрывать строки, если в выпадающем списке ничего не выбрано (Формулы/Formulas)

Страница 1 из 1
1