Ребята, срочно нужна ваша помощь.

У меня есть 2 функции на VBA, в которых я считаю остаток долга на начало периода (ОСТДОЛГНАЧ) и остаток долга на конец периода (ОСТДОЛГКОН).

Есть макрос, где я считаю досрочку.
Внутри этого макроса я и заполняю 2 столбца, используя эти функции.
Так же есть еще 24 столбца, которые заполняются макросом, но используют стандартную ВПР.
Все заполняется, все считается.

Мои шаги (беру часть макроса, в которой проблемы возникли):
1) заполняю 24 столбца ВПР-ом (из 12 листов)
2) делаю range.value = range.value (чтобы не висло в последствии)
3) заполняю столбец с помощью функции ОСТДОЛГНАЧ
4) делаю range.value = range.value (чтобы не висло в последствии)
5) заполняю столбец с помощью функции ОСТДОЛГКОН
6) делаю range.value = range.value (чтобы не висло в последствии)

В таблице, где я заполняю столбцы порядка 9000 строк.
На 12 листах, откуда я беру значения с помощью ВПР, примерно столько же (на каждом из них).

Все это иногда срабатывает на УРА, а иногда нет.

1) Столбец заполняется функцией
2) Считает для каждой строки значения
3) Макрос заменяет формулы на значения.
И вот шаг 2 не всегда выполняется до конца.
Т.е. до какой-то строки досчитал и не успел досчитать до конца, а уже делается замена функций на значения.

Как этого можно избежать, чтобы макрос дождался пока пройдет весь расчет, и только потом заменил функции на значения?

Функции заполняю следующим образом:

Я с 2007-м не работал никогда, но вот в 2003-м для пересчета формул можно было использовать Application.Calculate. Не подойдет?

Правильно, пересчёт - процесс асинхронный.

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

Это сообщение отредактировал(а) Sefko - 5.3.2009, 21:01

OST_DOLG_OOD_START и OST_DOLG_OOD_END - функции (их код не стала писать).
Сам основной макрос ниже (убрала разделы set  и dim):

OOD new, start plan dolg и end plan dolg - вот тут и проблема, когда он не досчитывает и идет дальше (пометила "!")

М-да, круто! 

Я попытался воспроизвести наблюдаемый Вами дефект. Но не получилось. Все работает якобы правильно.
Тем не менее... Вы же наблюдаете. Поэтому сделал попытку исправления кода (моего примера, естественно). Результата не знаю - у меня же и исходный вариант работает. Но может быть Вы узнаете результат? У Вас же исходный вариант не работает.



Это сообщение отредактировал(а) Sefko - 12.3.2009, 00:57

у меня сработал application.calculate   

не удалось воспроизвести из-за того, что стоит calculate )

спасибо всем огромное

Это сообщение отредактировал(а) Lapochka - 12.3.2009, 17:24