Példánkban egy új Word munkamenetet szeretnénk elindítani és egy adott dokumentumot megnyitni. A dokumentum ezután szerkeszthető. A Word meghívása a korábban integrált VBA könyvtárból származó parancsok segítségével történik.
Az „Objektum létrehozása” paranccsal hozhat létre Word munkamenetet egy Excel alkalmazásból. A "Word.Application" paraméter átvitelével új Word munkamenetet indít az Excelből. Itt a teljes kód:
Sub StartWord ()
Dim objWordApp objektumként
Dim strPath karakterláncként
strPfad = "C: \ Document.docx"
Állítsa be az objWordApp = _ CreateObject ("Word.application")
Az objWordApp segítségével
.Application.Visible = Igaz
.Application.Documents.Open (strPath)
- Itt vannak a parancsai
Vége ezzel
Set objWordApp = Semmi
End Sub
A program megnyit egy Word munkamenetet, és betölti a "C: \ Document.docx" dokumentumot. Hibaüzenetet kap, ha a dokumentum nem létezik ebben a helyzetben. A „Saját parancsok itt” pozícióból illessze be azokat a parancsokat, amelyekkel módosítja a Word dokumentumot. Kérjük, vegye figyelembe a parancsot az alprogram végén:
Set objWordApp = Semmi
Ez lezárja az Excel és a Word közötti kapcsolatot az "objWordApp" objektumváltozón keresztül. Ez fontos a program tiszta befejezéséhez.