ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как создать задержку в макросе?
3 сообщений из 3, страница 1 из 1
Как создать задержку в макросе?
    #33272870
Фотография Jetus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jetus
Участник

Пишу прогу на VBA в Word'e. Необходимо организовать задержку (паузу) в макросе на несколько секунд (милисекунд). Как это сделать?
З.Ы. Если можно, то чтобы во время задержки в макросе сам Word был доступен.


______________________________
Never Surrender - Nothing Impossible!
...
Рейтинг: 0 / 0
16.09.2005, 10:48:12
| Ответить | Цитировать | Написать  
Как создать задержку в макросе?
    #33272955
Пользователь2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пользователь2
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
    Dim PauseTime As Single
    Dim Start As Single
    Dim Finish As Single
    Dim TotalTime As Single
    
    PauseTime =  5 
    Start = Timer

    Do While Timer < Start + PauseTime
        DoEvents
    Loop

    Finish = Timer
    TotalTime = Finish - Start
    MsgBox "Paused for " & TotalTime & " seconds"
...
Рейтинг: 0 / 0
16.09.2005, 11:16:37
| Ответить | Цитировать | Написать  
Как создать задержку в макросе?
    #33273031
Фотография Jetus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jetus
Участник


Спасибо!

______________________________
Never Surrender - Nothing Impossible!
...
Рейтинг: 0 / 0
16.09.2005, 11:36:11
| Ответить | Цитировать | Написать  
3 сообщений из 3, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как создать задержку в макросе?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?desktop=1&fid=60&tid=2167178]:
 0ms
get settings:
 7ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 27ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 1ms
others: 187ms
total:  288ms
созд. / загр.: 288ms
x
x
Закрыть


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