|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
16.03.2012, 13:46
|
#1 |
|
Регистрация: 15.11.2010
Сообщений: 3
|
Как дать возможность перерисовываться приложению при выполнении макроса?
Уважаемые господа при выполнении макроса Excel подвисает до конца работы макроса, а это 40 минут, пользователь хочет скролить лист и наблюдать за процессом. Чего можно сделать что бы приложение не подвисало?
|
|
|
|
16.03.2012, 13:54
|
#2 |
|
Регистрация: 15.11.2010
Сообщений: 3
|
Знаю что обычно это отключают, но тут другой случай
|
|
|
|
|
16.03.2012, 14:20
|
#3 |
|
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Надо макрос переписать.
Что это за макрос, который работает так долго? Единственное, что может работать так долго, и что не ускорить, - это загрузка большого объема данных из интернета (запросы к тысячам веб-страниц) Покажите свой макрос в файле Excel |
|
|
|
|
17.03.2012, 12:59
|
#4 |
|
Форумчанин
Регистрация: 30.01.2008
Сообщений: 314
|
соглашусь с пред оратором, в части оптимизации.
но если не получается, то надо включить в макрос оператор(ы) doevents |
|
|
|
|
19.03.2012, 17:02
|
#5 |
|
Новичок
Джуниор
Регистрация: 19.03.2012
Сообщений: 1
|
Как вариант, можно в теле цикла добавить строку
Код:
|
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Ошибка 400 при выполнении макроса | shoa_izh | Microsoft Office Excel | 12 | 15.07.2011 15:08 |
| Возможность сокрытия текста макроса | Хфедя | Microsoft Office Excel | 5 | 12.11.2010 10:41 |
| Ошибка при выполнении макроса | rlev | Microsoft Office Excel | 8 | 22.02.2010 12:41 |
| как сделать на своем сайте возможность устанавливать его, как стартовую страницу при загрузке броузера | Chaynik | Помощь студентам | 2 | 02.03.2009 23:10 |
| При выполнении макроса, дергается таблица | valerij | Microsoft Office Excel | 3 | 23.03.2008 00:38 |
