"Вставка формулы в ячейку" замедляет скорость работы макроса

Старая форма входа

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

Мир MS Excel » Вопросы и решения » Вопросы по VBA » "Вставка формулы в ячейку" замедляет скорость работы макроса (Макросы/Sub)

bumnik

Дата: Пятница, 20.11.2015, 09:46 | Сообщение № 1

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

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

Сообщений: 185

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

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

Excel 2007,2010

Здравствуйте! Подскажите как ускорить скорость работы макроса? Если изменить значение ячейки С18 на более нуля, то происходит вставка формулы в ячейку С22, С24 и т.д. Эта часть кода (вставка формулы в ячейку) и замедляет скорость работы кода. Можно ли что-то улучшить?

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

Ответить

SLAVICK

Дата: Пятница, 20.11.2015, 10:18 | Сообщение № 2

Группа: Модераторы

Ранг: Старожил

Сообщений: 2290

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

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

2019

Замените вначале макроса:
[vba]

Код

Application.Calculation = xlCalculationAutomatic
на
Application.Calculation = xlCalculationManual

[/vba]

И добавьте вначале макроса:
[vba]

Код

Application.EnableEvents = False

[/vba] Это отключит чувствительность к событиям
а в конце
[vba]

Код

Application.EnableEvents = True

[/vba]Это включит чувствительность к событиям

эти изменения отключат многократный запуск макроса после изменения ячейки. Сейчас у Вас после каждой вставки формулы, очистки... это макрос запускается снова и снова.