Замедление прохода по циклу - VBA

Формулировка задачи:

Здравствуйте, уважаемые программисты. Помогите решить проблему. У меня на листе есть таймер, запускающийся кнопками Старт-Стоп. Если в любом месте листа поставить формулу СЛУЧМЕЖДУ - то там можно увидеть, что скорость обновления значения - наверное каждую милисекунду. Как замедлить проход по циклу до уровня - один раз в 7 секунд (вместо 1 раза в милисекунду как сейчас) ?

Решение задачи: «Замедление прохода по циклу»

textual
                            Листинг программы 
                        
                            Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)