Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
VBA: не работает таймер
 
#1
22.06.2018 16:51:25
Всем привет!

Подскажите пожалуйста, почему может не срабатывать макрос по таймеру? Процедура по кнопке работает без нареканий, вставил код таймера, но почему-то в указанное время ничего не происходит, перечитал кучу источников - ответа, к сожалению, не нашел
Код
Sub AutoRunMacro()
Application.OnTime TimeValue("10:00:00"), "procedure" 
End Sub

Заранее спасибо  
 
 
 
#2
22.06.2018 17:00:33
Вы реально ждали 10-ти часов?
Изменено: TheBestOfTheBest - 22.06.2018 17:12:02
Неизлечимых болезней нет, есть неизлечимые люди.
 
 
 
#3
22.06.2018 17:05:44
http://excel2010.ru/tryuk-82-kak-zapustit-makros-v-opredelennoe-vremya.html
 
 
 
#4
22.06.2018 18:21:52
По описанной схеме тоже пробовал, ничего не происходит, время доходит до указанного, но макрос так и не запускается
В самом макросе:
Код
Sub Coupon_Alert_Today()
Application.OnTime TimeValue("18:14:00"), "Coupon_Alert_Today"

В ThisWorkBook
Код
Private Sub Workbook_Open()
Application.OnTime TimeValue("18:14:00"), "Coupon_Alert_Today"
End Sub
 
 
 
#5
22.06.2018 18:24:39
Сообщение №2 Вы осмыслили?
 
 
 
#6
22.06.2018 18:52:05
Интересно, как Вы определили что не запустился макрос
Код
Sub Coupon_Alert_Today()
Application.OnTime TimeValue("18:14:00"), "Coupon_Alert_Today"
 
 
 
#7
22.06.2018 18:56:14
Цитата
vikttur написал: Сообщение №2 Вы осмыслили?
10 часов было указано, как пример, для проверки никто не мешает ставить ближайшее время и ждать пока запуститься макрос
Таймер сработал - вопрос закрыт, спасибо yozhik

Уважаемый модератор, меньше хамите и будет с Вами счастье, отличных выходных
 
 
 
#8
22.06.2018 19:27:45
Где Вы хамство увидели?
Вы вообще ни слова не написали о том, что видели это сообщение, не ответили помогающему даже пол-слова - это нормально, а когда обратили Ваше внимание на сообщение - уже хамство...

Таймер сработал - и хорошо. Но Вы опять ни слова не написали о причине нерабротоспособности. А ведь после Вас тема не удаляется, люди будут заходить с похожей проблемой. Да, ссылка... Но кому-то может помочь описание решения проблемы в двух словах.
 
 
 
#9
22.06.2018 20:18:59
Кстати, т.к. люди будут заходить - может кому понадобится
Multiple Variable Arguments to Application.OnTime
https://stackoverflow.com/questions/31439866/multiple-variable-arguments-to-application-ontime
Недавно была такая задача - оказалось что можно!
Но об этом нигде не написано ни слова...
Изменено: Hugo - 22.06.2018 20:21:27
 
 
 
#10
22.06.2018 22:39:28
Цитата
Hugo написал: Но об этом нигде не написано ни слова...
Еще как написано!  :)  
Владимир
 
 
 
#11
22.06.2018 22:51:11
Владимир, ну это тоже самое, что и я указал, но спасибо, отменять тоже нужно уметь :)
А вот почему молчит Microsoft?  Почему молчит help, почему молчит MSDN?
 
 
 
#12
22.06.2018 23:03:37
Стесняются.
 
 
 
#13
22.06.2018 23:12:43
Цитата
Hugo написал: А вот почему молчит Microsoft?
Игорь, дает нам возможность самовыражения... :)  
Владимир
 
 
 
#14
23.06.2018 19:02:00
Добрый день. У меня тоже вопрос по таймеру. Для запуска таймера используется следующая команда:
Код
Sub Timer()
t = Now + TimeValue("00:00:10")
Application.OnTime Earliestteme:=t, Prozedure:="zapusk"
End Sub

Эта команда без нареканий отрабатывала на эксель 2010, но после перехода на версию 2016 макрос останавливается на моменте Application.OnTime Earliestteme:=t, Prozedure:="zapusk". Интересно, что если кликнуть на экране в момент запуска макроса, то все отработает. Но суть в том, что макрос работает через планировщик ранним утром и возможности кликать по нему нет. В итоге каждый раз он останавливается на одном и том же месте. Быть может кто сталкивался с такой проблемой. Спасибо  
 
 
 
#15
23.06.2018 19:38:27
Kira999, попробуйте без этих иностранных слов:
Код
Application.OnTime t, "zapusk"
 
 
 
#16
24.06.2018 00:26:08
Цитата
Kira999 написал:
Application.OnTime Earliestteme:=t, Prozedure:="zapusk"
Эта команда без нареканий отрабатывала на эксель 2010
Это вряд ли.
Изменено: Казанский - 24.06.2018 00:26:51
 
 
 
Страницы: 1
Наверх