У меня есть следующая подпрограмма VBA, которая вызывает себя каждую секунду:
Public Sub AllTheTime()
iTimerSet = Now + TimeValue("00:00:01")
Call runMyFunction
Application.OnTime iTimerSet, "AllTheTime"
End Sub
Этот скрипт работает отлично: он вспоминает себя каждую секунду и что-то вычисляет.
Но когда я устанавливаю надстройку Bloomberg Office (лента Bloomberg), она больше не работает: она запускается ровно один раз, а затем останавливается. Я проверил это с помощью Debug.Print. Похоже, Bloomberg останавливает метод Application.OnTime.
У вас есть идеи, что вызывает такое поведение?
iTimerSet = Now + TimeValue("00:00:01")
после, когда вы звонитеrunMyFunction
. - person assylias   schedule 02.10.2020Application.OnTime
во всех случаях, которые я рассмотрел. - person feetwet   schedule 08.01.2021