В нашем примере мы хотим начать новый сеанс Word и открыть определенный документ. После этого документ можно редактировать. Word вызывается с помощью команд из ранее интегрированной библиотеки VBA.
Используйте команду «Создать объект», чтобы создать сеанс Word из приложения Excel. Передавая параметр «Word.Application», вы запускаете новый сеанс Word из Excel. Вот полный код:
Sub StartWord ()
Dim objWordApp как объект
Dim strPath как строка
strPfad = "C: \ Document.docx"
Установите objWordApp = _ CreateObject ("Word.application")
С objWordApp
.Application.Visible = Верно
.Application.Documents.Open (strPath)
'Вот ваши команды
Конец с
Установите objWordApp = Nothing
Конец подписки
Программа открывает сеанс Word и загружает документ «C: \ Document.docx». Вы получите сообщение об ошибке, если документ не существует в этой позиции. Из позиции «Здесь ваши команды» вставьте команды, с помощью которых изменяется документ Word. Обратите внимание на команду в конце подпрограммы:
Установите objWordApp = Nothing
Это закрывает соединение Excel с Word через объектную переменную objWordApp. Это важно для достижения чистого завершения программы.
