Kuidas käivitada Word Exceli makro abil

Lang L: none (table-of-contents)

Meie näites soovime alustada uut Wordi seanssi ja avada konkreetne dokument. Seejärel saab dokumenti redigeerida. Wordi kutsutakse varem integreeritud VBA raamatukogu käskude abil.

Kasutage käsku „Loo objekt”, et luua Exceli rakendusest Wordi seanss. Parameetri "Word.Application" teisaldamisega alustate uut Wordi seanssi Excelist. Siin on täielik kood:

Alam StartWord ()
Dim objWordApp objektina
Dim strPath kui string
strPfad = "C: \ Document.docx"
Määra objWordApp = _ CreateObject ("Word.application")
Koos objWordApp
.Application.Visible = Tõsi
.Application.Documents.Open (strPath)
'Siin on teie käsud
Lõpeta
Määra objWordApp = Mitte midagi
End Sub

Programm avab Wordi seansi ja laadib dokumendi "C: \ Document.docx". Kui dokumenti selles asendis pole, saate veateate. Sisestage positsioonilt „Teie käsud siin” käsud, millega Wordi dokumenti muudetakse. Pange tähele alamprogrammi lõpus olevat käsku:

Määra objWordApp = Mitte midagi

See sulgeb ühenduse Excelist Wordi objektimuutuja "objWordApp" kaudu. See on oluline programmi puhta lõpu saavutamiseks.

Te aitate arengu ala, jagades leht oma sõpradega

wave wave wave wave wave