V našem příkladu chceme zahájit novou relaci aplikace Word a otevřít konkrétní dokument. Dokument lze poté upravit. Word se nazývá pomocí příkazů z dříve integrované knihovny VBA.
Pomocí příkazu „Vytvořit objekt“ vytvořte relaci aplikace Word z aplikace Excel. Přenesením parametru „Word.Application“ spustíte novou relaci aplikace Word z aplikace Excel. Zde je kompletní kód:
Sub StartWord ()
Dim objWordApp jako objekt
Dim strPath jako řetězec
strPfad = "C: \ Document.docx"
Nastavit objWordApp = _ CreateObject ("Word.application")
S objWordApp
.Application.Visible = True
.Application.Documents.Open (strPath)
„Tady jsou vaše příkazy
Konec s
Nastavit objWordApp = Nic
End Sub
Program otevře relaci aplikace Word a načte dokument „C: \ Document.docx“. Pokud dokument v této pozici neexistuje, zobrazí se chybová zpráva. Z pozice „Vaše příkazy zde“ vložte příkazy, pomocí kterých se mění dokument aplikace Word. Všimněte si prosím příkazu na konci podprogramu:
Nastavit objWordApp = Nic
Tím se uzavře připojení z Excelu do Wordu prostřednictvím objektové proměnné „objWordApp“. To je důležité pro dosažení čistého konce programu.
