Это нужно для проверки результатов расчета через VBA с данными другой книги. Программа после проверки продолжается. Если при открытии этой самой книги Excel не успевает пересчитать формулы, то результаты могут не сойтись.
Примерное время пересчета 5-7 сек, поэтому, пока, использую таймер на 10 сек. Но это на моей машине, у других может быть и больше.
MaxM написал: Если при открытии этой самой книги Excel не успевает пересчитать формулы, то результаты могут не сойтись
Поставьте принудительный пересчет нужных листов Worksheets(1).Calculate или всего экселя Application.Calculate (or just Calculate) После этого можно быть уверенным, что все пересчиталось и ждать ничего не нужно.