Разместил следующую процедуру в основной модуль листа 1, куда и копируется Таблица текущих параметров.
Public Sub Pusk()
dTime = Now + TimeValue(«00:02:00»)
Application.OnTime EarliestTime:=dTime, Procedure:=«CopyWork»
Application.OnTime EarliestTime:=dTime, Procedure:=«CopyWork», Schedule:=False
End Sub

Просто пока навыков мало, но кажется при каждом обновлении листа 1 все процедуры основного модуля на этом листе должны выполняться. Но этого не произошло. CopyWork находится в модуле 1. Принудительно один раз процедура Pusk запускается, а чтобы сама постоянно через две минуты выполнялась не получается.

Проблема в том, что запущенный любой макрос приводит к сбоем в потоке данных DDE, функция API Sleep также не помогает. OnTime единственный метод таймера не приводящий к сбоем в данных, но нужно, чтобы процедура реагировала на поток данных в таблице вывода и это было без циклов и макросов.

Есть идея, что есть переменная, меняя значение которой коды на основном листе книги можно перезапускать как при открытии книги. Или осуществить переход к другой процедуре с закрытием первой и оттуда вызвать первую опять, или связать запуск процедуры с изменением таблицы вывода по DDE(куда при этом поместить код запуска не знаю)только не знаю как это сделать.