Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Таймер не хочет запускаться - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Таймер не хочет запускаться (Макросы/Sub)
Таймер не хочет запускаться
ПАМ Дата: Суббота, 23.12.2017, 17:31 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 127
Репутация: 11 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте уважаемые знатоки.
Решил я как-то сам попробовать свои силы в написании макросов, нашел видео, все сделал (вроде) по нему и не пойму почему у автора видео получается макрос а у меня нет . Объясните мне пожалуйста в чем моя ошибка или что может добавить. Заранее огромное спасибо!
К сообщению приложен файл: 3760232.xlsm(22.2 Kb)
 
Ответить
СообщениеЗдравствуйте уважаемые знатоки.
Решил я как-то сам попробовать свои силы в написании макросов, нашел видео, все сделал (вроде) по нему и не пойму почему у автора видео получается макрос а у меня нет . Объясните мне пожалуйста в чем моя ошибка или что может добавить. Заранее огромное спасибо!

Автор - ПАМ
Дата добавления - 23.12.2017 в 17:31
RAN Дата: Суббота, 23.12.2017, 17:34 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4729
Репутация: 950 ±
Замечаний: 0% ±

2010
starttimer<>startimer


Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщениеstarttimer<>startimer

Автор - RAN
Дата добавления - 23.12.2017 в 17:34
InExSu Дата: Суббота, 23.12.2017, 22:46 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 331
Репутация: 41 ±
Замечаний: 60% ±

Excel 2010
Привет!
и тут есть что улучшить:
[vba]
Код
sheet1.Range("B2").Value = sheet1.Range("B2").Value = TimeValue("00:00:01")
[/vba]
попробуйте:
[vba]
Код
Range("B2").Value = TimeValue("00:00:01")
[/vba]
далее:
[vba]
Код
Application.OnTime Now + TimeValue("00:00:01"), "nexttick", , False
[/vba]
не уверен, может на
[vba]
Код
Range("B2").Value = Now
[/vba]
?
Что за видео?
 
Ответить
СообщениеПривет!
и тут есть что улучшить:
[vba]
Код
sheet1.Range("B2").Value = sheet1.Range("B2").Value = TimeValue("00:00:01")
[/vba]
попробуйте:
[vba]
Код
Range("B2").Value = TimeValue("00:00:01")
[/vba]
далее:
[vba]
Код
Application.OnTime Now + TimeValue("00:00:01"), "nexttick", , False
[/vba]
не уверен, может на
[vba]
Код
Range("B2").Value = Now
[/vba]
?
Что за видео?

Автор - InExSu
Дата добавления - 23.12.2017 в 22:46
Hugo Дата: Суббота, 23.12.2017, 22:54 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2771
Репутация: 628 ±
Замечаний: 0% ±

По поводу сбросить запуск - смотрите внимательно пример из хелпа:
[vba]
Код
Application.OnTime EarliestTime:=TimeValue("17:00:00"), _
    Procedure:="my_Procedure", Schedule:=False
[/vba]
там не указывается время Now + TimeValue("00:00:01"), там указывается конкретное время!
На практике это удобнее делать через переменную - какой задали следующее время, той и скидываем запуск.


excel@nxt.ru
webmoney: E265281470651 R418926282008 Z422237915069
 
Ответить
СообщениеПо поводу сбросить запуск - смотрите внимательно пример из хелпа:
[vba]
Код
Application.OnTime EarliestTime:=TimeValue("17:00:00"), _
    Procedure:="my_Procedure", Schedule:=False
[/vba]
там не указывается время Now + TimeValue("00:00:01"), там указывается конкретное время!
На практике это удобнее делать через переменную - какой задали следующее время, той и скидываем запуск.

Автор - Hugo
Дата добавления - 23.12.2017 в 22:54
ПАМ Дата: Воскресенье, 24.12.2017, 10:16 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 127
Репутация: 11 ±
Замечаний: 0% ±

Excel 2010
RAN, вы правы я не заметил
InExSu, ваше пока не до конца к сожалению понял
Hugo, я подумаю

Спасибо всем
 
Ответить
СообщениеRAN, вы правы я не заметил
InExSu, ваше пока не до конца к сожалению понял
Hugo, я подумаю

Спасибо всем

Автор - ПАМ
Дата добавления - 24.12.2017 в 10:16
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Таймер не хочет запускаться (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования
© 2010-2018 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!