|
|
Бывают ситуации, когда необходимо, чтобы во время работы с Wordом
запускалась какая-то сторонняя программа. Если эти ситуации повторяются, то проще всего написать макрос выполнения нужной программы и запускать его в Wordе по необходимости. Ниже приведен текст макроса: On Error Resume Next Program = "C:\myprog.exe" TaskID = Shell(Program, 1) If Err <> 0 Then MsgBox "Невозможно выполнить" End If Макрос запускает программу myprog.exe, расположенную на диске С Вашего компьютера. Как происходит создание макроса: В документе выбираем Сервис - Макрос - Начать запись В появившемся окне "Запись макроса" нажимаем ОК (Предварительно запоминаем или пишем сами название макроса) В появившемся маленьком окошке выбираем Остановить запись. В документе выбираем Сервис - Макрос - Макросы и видим появившейся Ваш новый макрос. Выделяем его и нажимаем Изменить Появится окно Visual Basic, где между строчками Sub и End Sub Вашего макроса надо вставить приведенный выше код. Теперь нажимаем сохранить и выходим из Visual Basic. В документе Word при выполнении Вашего макроса будет запускаться указанная Вами программа. Выбираем Сервис - Макрос - Макросы и нажимаем Выполнить на Вашем макросе. Выполняться макрос можно заставить и любым другим необходимым Вам способом. Читать еще Переключение раскладки клавиатуры в DOS под Windows XP |
|
|