Для того, чтобы приостановить выполнение макроса на определённое время, достаточно использовать метод Wait объекта Application. Далее следуют пять примеров, которые могут остановить выполнение макроса на десять секунд.
Application.Wait Time:=DateAdd("s", 10, Now)
Application.Wait Time:=Now + #12:00:10 AM#
Application.Wait Time:=Now + 10 / 86400
Application.Wait Time:=Now + TimeSerial(0, 0, 10)
Application.Wait Time:=Now + TimeValue("0:00:10")