Как целенаправленно провести пересчет
Если вы хотите обеспечить целевой пересчет таблиц в своих макросах, используйте метод Рассчитать а. Это может быть полезно в больших таблицах, в которых автоматический расчет отключен, потому что он занимает слишком много времени.
Используйте следующую строку программы для пересчета всех таблиц во всех открытых папках:
Application.Calculate
Если вы хотите пересчитать только один лист, используйте следующую команду:
Рабочие листы (1). Рассчитать
Об объекте Рабочие листы (1) адрес нужной электронной таблицы. Чтобы пересчитать все таблицы в книге, в которой выполняется макрос, используйте следующий макрос:
Sub ThisHereAllCalculate ()
Dim i как целое число
Для i = 1 To ThisWorkbook.Worksheets.Count
ThisWorkbook.Worksheets (i) .Calculate
Далее я
Конец подписки