Форум программистов
 
О проблемах с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

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

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


Ответ
 
Опции темы
Старый 22.11.2010, 11:40   #11
EugeneS
Форумчанин
 
Регистрация: 06.08.2009
Сообщений: 472
По умолчанию

см. вложение "result0"

В макросе использовались имена книг: "Альфа-директ" и "ЖУРНАЛ УЧЕТА". Соответственно, если Вы изменяете имя книги, необходимо вносить изменения в код. В выложенных Вами файлах (папка "result0") файл "Альфа-директ" стал "Альфа-директ2". Изменил "Альфа-директ" на "Альфа-директ2", все работает.

Если Вас интересует чтобы запуск макроса не был привязан к имени книги "Альфа-директ.xls", можно сделать так, см. вложение "result_new"
Вложения
Тип файла: zip result0.zip (65.4 Кб, 10 просмотров)
Тип файла: zip result_new.zip (65.9 Кб, 14 просмотров)

Последний раз редактировалось EugeneS; 22.11.2010 в 12:18.
EugeneS вне форума Ответить с цитированием
Старый 24.11.2010, 00:48   #12
EugeneS
Форумчанин
 
Регистрация: 06.08.2009
Сообщений: 472
По умолчанию

вот пример работы макроса по таймеру, интервал 20 секунд, в макрос внесены некоторые изменения. Установите временной стоп (сейчас 23:42), изменив значение часов и минут в данной строке:

Код:
If Hour(newtime) = 23 And Minute(newtime) = 42 Then
и нажмите "Выполнить".
Вложения
Тип файла: zip result_timer_new.zip (69.1 Кб, 8 просмотров)
EugeneS вне форума Ответить с цитированием
Ответ
Купить рекламу на форуме 20000 рублей в месяц
Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удалить пустую строку созданную StringList-ом Shouldercannon Общие вопросы Delphi 18 14.12.2011 10:52
Как выбрать последный пустую строку в LISTBOX ? Aqil_f Microsoft Office Excel 14 06.09.2010 17:00
Как считать последнюю строку ? Katmai Общие вопросы Delphi 13 27.07.2010 19:49
Преобразование даты в пустую строку insense БД в Delphi 6 02.07.2010 08:13
Удалить пустую строку из ListView Shouldercannon Общие вопросы Delphi 2 28.04.2010 15:02


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS