|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
17.04.2017, 14:05 | #1 |
Новичок
Джуниор
Регистрация: 17.04.2017
Сообщений: 2
|
автоскрытие строк
добрый день, нужна помощь зеленому и не соображающему в этом деле новичку.очень сильно тормозит макрос и реагирует на ввод данных не влияющих на работу макроса.
есть рабочий макрос: Sub Worksheet_Calculate() Application.EnableEvents = False For r = 13 To 112 Rows(r).EntireRow.Hidden = Cells(r, 5) = "" Next Application.EnableEvents = True End Sub скрывающий пустые строки(13:112)столбца5 на листе3, по такому принципу и на листе 2. так вот при изменении ячеек листа1 не влияющих на расчеты включается макрос((((что не нужно и тормозит((( я, конечно не спец, но может можно как-то конкретизировать лист и диапазон для выполнения макроса авт. скрытие.zip |
18.04.2017, 11:09 | #2 |
Участник клуба
Регистрация: 02.05.2010
Сообщений: 1,390
|
Попробуйте так, второй лист:
Код:
Код:
mailto: kuklp60@gmail.com, ящики для благодарностей:
WM Z206653985942, R334086032478, U238399322728 |
20.04.2017, 19:33 | #3 |
Новичок
Джуниор
Регистрация: 17.04.2017
Сообщений: 2
|
не сработал(((((( спасибо за интерес
я вот тут посидел и подумал, в нете покапался......и вот то, что я хотел.... все работает как мне надо кому интересно вот код: Sub Worksheet_Activate() Application.EnableEvents = False Rows("12:112").AutoFilter Field:=5, Criteria1:="<>" Application.EnableEvents = True End Sub как это работает: для строк 12:112, столбца 5, запускается автофильтр по критерию "пусто (можно подставить 0)". в 5 столбец данные попадают из другого листа через формулы. ГЛАВНОЕ никаких кнопок))))все работает |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Для матрицы из 3 столбцов и 7 строк отпечатать номера тех строк, в которых третий элемент больше суммы двух других элементов строк | abramov | Помощь студентам | 2 | 03.12.2013 10:15 |
Ввести последовательность строк. Подсчитать количество совпадающих строк. на языке SHELL | lj23lj | Фриланс | 1 | 30.03.2012 16:41 |
Как сделать автозаполнение строк, которые зависят от строк другого столбца | путвфда_иил | Microsoft Office Excel | 19 | 29.08.2010 17:16 |
Добавление строк в таблицу с вставкой в них текста и чередованием фона строк | Centurion2xx6 | Microsoft Office Word | 9 | 30.03.2010 11:00 |
Excel max 256 строк VS user надо 300 строк | Exo | Microsoft Office Excel | 3 | 10.01.2008 17:14 |