excel application.ontime для запуска в час каждый час независимо от времени запуска таймера

У меня есть VBA sub, который нужно запускать при изменении каждого часа. поэтому в 7:00, 8:00 и т. д. На данный момент я могу запустить его каждые 60 минут, но для того, чтобы он работал в час, оператор должен запустить таймер точно в час. мой код, который используется для этого, выглядит следующим образом:

Public RunWhen As Double Public Const cRunIntervalSeconds = 3600 Public Const cRunWhat = "transfer" ----------------------------------------------------------------------- Sub StartTimer() RunWhen = Now + TimeSerial(0, 0, cRunIntervalSeconds) Application.OnTime EarliestTime:=RunWhen, Procedure:=cRunWhat, _ Schedule:=True End Sub 

Я пытаюсь найти способ, чтобы это ускорилось ровно в час, безуспешно какое-то время, каждое место, которое я смотрю, просто говорит мне делать именно то, что я уже сделал, и просто убедитесь, что я начинаю его точно в час.

например: если оператор не добирается до станции до 7:10 и попадает на кнопку, которая запускает код, я все же хочу, чтобы он выполнял подпункт «передача» в 8:00 и 9:00 и т. д.

как бы вы предложили мне изменить или добавить к этому коду, чтобы заставить его выполнить то, что я пытаюсь сделать? Спасибо за помощь!

Interesting Posts

Пользовательская панель задач VSTO-Excel AutoResize на основе разрешения экрана

Excel VB для создания ежемесячной таблицы на основе пользовательского ввода

VBA в Excel 2007. Я хочу использовать регулярные выражения в Excel VBA, чтобы заменить «Он» на «Она», «он» с «она», «он» с «ее»,

XSL – изменение XML-экспорта в Excel для изменения размеров столбцов

Отфильтровать значения Pivot Table, полученные из небольшой группы данных

В Excel VBA присвоение цвета заливки для ячейки дает #Value

Excel VBA: объект не установлен во втором цикле

Добавьте заголовок столбца excel в один заголовок, используя c sharp

Как добавить границу в экспорт excel

Можно ли удалить детали с ленты, в VSTO Excel C # Настройка уровня документа?

vba для удаления пустых столбцов в нескольких листах.

как получить данные от доступа к excel в формате html с помощью vba?

Excel Macro копирует только «ложное» значение логического выражения

Как сохранить / перезаписать существующий файл Excel без сообщения

Экземпляр Excel VBA – Ошибка InputBox

Давайте будем гением компьютера.