Отобразить скрытые строки под активной ячейкой - Microsoft Office Excel

Polzovatel · 30.12.2011, 11:37

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

Казанский · 30.12.2011, 11:58

Может, сделать группировку - и макросов не надо?

Polzovatel · 30.12.2011, 12:08

Цитата:

Сообщение от Казанский

Может, сделать группировку - и макросов не надо?

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

Казанский · 30.12.2011, 12:27

попробуйте

Код:

Sub Skrit()
    Range("A3:A65536").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
End Sub

Sub Otobrazit()
    ActiveCell.Resize(21).EntireRow.Hidden = False
End Sub

IgorGO · 30.12.2011, 12:34

Цитата:

а во-вторых мне это просто интересно

ну... если так стоит вопрос, то как раз раскопать и сделать все самостоятельно - это самое интересное.

Polzovatel · 30.12.2011, 12:36

Да.. вот это то, что надо!
и так компактно...
Мне ещё учиться и учиться((
Спасибо огромное!

Polzovatel · 30.12.2011, 12:36

Цитата:

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

ну... если так стоит вопрос, то как раз раскопать и сделать все самостоятельно - это самое интересное.

Копаю, но чего-то не докапываю )))

30.12.2011, 12:27	#4
Казанский Старожил Регистрация: 31.12.2010 Сообщений: 2,133	попробуйте Код: `Sub Skrit() Range("A3:A65536").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True End Sub Sub Otobrazit() ActiveCell.Resize(21).EntireRow.Hidden = False End Sub` exceleved@yandex.ru Яндекс.Деньги: 410011500007619

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Выделение цветом столбца и строки активной ячейки	cerberochek	Microsoft Office Excel	7	28.11.2012 12:56
Проблема: формула СЧЁТЕСЛИМ учитывает отфильтрованные (скрытые) строки	Александр08	Microsoft Office Excel	10	12.12.2010 17:36
удаление строки с ячейкой, которая повторяется	Aneli	Microsoft Office Excel	15	25.03.2010 17:18
Как вывести данные активной строки excel?	kipish_lp	Microsoft Office Excel	4	25.02.2010 17:18
Как передать адрес активной строки в другую таблицу	parsn	Microsoft Office Excel	2	04.01.2010 23:32

30.12.2011, 12:36	#6
Polzovatel Пользователь Регистрация: 20.12.2011 Сообщений: 19	Да.. вот это то, что надо! и так компактно... Мне ещё учиться и учиться(( Спасибо огромное!