У нашому прикладі ми хочемо розпочати новий сеанс Word і відкрити певний документ. Після цього документ можна редагувати. Word викликається за допомогою команд із раніше інтегрованої бібліотеки VBA.
Використовуйте команду "Створити об'єкт", щоб створити сеанс Word із програми Excel. Передаючи параметр "Word.Application", ви починаєте новий сеанс Word із Excel. Ось повний код:
Sub StartWord ()
Затемнити objWordApp як об’єкт
Затемнити strPath як рядок
strPfad = "C: \ Document.docx"
Встановіть objWordApp = _ CreateObject ("Word.application")
За допомогою objWordApp
.Application.Visible = Істина
.Application.Documents.Open (strPath)
- Ось ваші команди
Закінчити з
Встановити objWordApp = Нічого
End Sub
Програма відкриває сеанс Word і завантажує документ "C: \ Document.docx". Якщо документ не існує на цій позиції, ви отримаєте повідомлення про помилку. З позиції «Ваші команди тут» вставте команди, за допомогою яких змінюється документ Word. Зверніть увагу на команду в кінці підпрограми:
Встановити objWordApp = Нічого
Це закриває з'єднання з Excel до Word за допомогою об'єктної змінної "objWordApp". Це важливо для досягнення чистого завершення програми.
