Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Запуск экселевского документа с некоторой периодичностью / 5 сообщений из 5, страница 1 из 1
31.05.2007, 11:51:58
    #34563939
lioner
lioner
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск экселевского документа с некоторой периодичностью
Здравствуйте! Помогите в проблеме:
Есть док-т экселя с макросом который выполняется при запуске (auto_open()). Создал назначенное задание, указал путь к док-та, назначил промежутки времени для запуска задания и т.д. Док-т запускается, но макрос не запускается пока не активируешь окно экселя! А нужно чтобы все происходило автоматически! Если я запущу сам документ (не через планировщик заданий), то все работает. Тут что то с фокусом и ативностью самого экселя.... Как побороть?
Зараннее спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.05.2007, 12:43:15
    #34564222
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск экселевского документа с некоторой периодичностью
используй для запуска макрос с OnTime вместо планировщика, будет работать в любом режиме
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.05.2007, 12:56:20
    #34564297
lioner
lioner
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск экселевского документа с некоторой периодичностью
к vbapro: а можно поподробнее про OnTime ? Небольшой примерчик!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.05.2007, 13:33:42
    #34564502
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск экселевского документа с некоторой периодичностью
использовать совсем просто:
Вариант 1: если нужно запускать периодически
Код: plaintext
1.
2.
3.
Sub StartMyMacro()
    Application.OnTime Now + TimeValue("00:00:01"), "StartMyMacro"
    MoMainAction    ' вызываешь основной код
End Sub
Вариант 2: если нужно запускать один раз
Код: plaintext
1.
2.
Sub StartMyMacro()
    Application.OnTime TimeValue("13:30:00"), "MoMainAction"
End Sub
в help тоже неплохо все описано
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.05.2007, 13:51:39
    #34564618
lioner
lioner
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск экселевского документа с некоторой периодичностью
Не стал изобретать велосипед - в планировщике заданий запускаю простенький ява-скрипт:
========================================
var WshShell = WScript.CreateObject("WScript.Shell");
WshShell.Run("excel.exe D:\\MyWork\\serfing.xls",3);
========================================
параметр 3 в методе Run максимизирует окно Экселя и передает ему фокус, следовательно мой макрос запускается автоматически.
Всем спасибо, тема закрыта!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Запуск экселевского документа с некоторой периодичностью / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 335ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2182869]:
 0ms
get settings:
 6ms
get forum list:
 15ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 54ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 45ms
get tp. blocked users:
 1ms
others: 199ms
total:  335ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]