Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 14.03.2011, 14:02   #1
tae1980
Форумчанин
 
Регистрация: 02.02.2009
Сообщений: 842
По умолчанию Отключение таймера

Создаю таймер командой:
Application.OnTime Now + TimeValue("00:00:01"), "МенеджерЛистовТаймер"
Но пока он работает невозможно закрыть книгу.
Пытаюсь по событию "BeforeClose" отключить таймер командой:
Application.OnTime EarliestTime:=(Now + TimeValue("00:00:01")), Procedure:="МенеджерЛистовТаймер", Schedule:=False
Но получаю ошибку "1004". Что я делаю не так?
С уважением, Алексей.
tae1980 вне форума Ответить с цитированием
Старый 14.03.2011, 14:06   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Цитата:
Что я делаю не так?
Для отмены запланированного макроса надо указать ТОЧНОЕ время, на которое он был назначен.

Т.е. планируем запуск так:
Код:
Время = Now + TimeValue("00:00:01")
Application.OnTime Время , "МенеджерЛистовТаймер"
а отменяем - так ("Время" - глобальная переменная)
Код:
Application.OnTime EarliestTime:=Время, Procedure:="МенеджерЛистовТаймер", Schedule:=False
EducatedFool вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Запуск таймера Alexandr000006 Помощь студентам 4 08.03.2011 16:09
Timer 3 таймера Бриит Помощь студентам 3 09.11.2010 10:21
Прерывания таймера. Kingdom_Reborn Помощь студентам 0 07.11.2010 22:58
Интервал Таймера... Roof Общие вопросы Delphi 27 08.07.2008 20:19
использование таймера KancJler Помощь студентам 13 19.04.2008 01:13