Otvorte dokument programu Word
Toto makro Word VBA otvorí dokument programu Word zo zadaného adresára:
Sub OpenDoc () Dim strFile As String strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'zmena na cestu k súboru If Dir (strFile) "" Potom' Najprv skontrolujeme, či dokument vôbec existuje dané umiestnenie Documents.Open strFile End If End Sub
Teraz môžete pracovať s novo otvoreným dokumentom pomocou objektu ActiveDocument. Tento kód pridá do dokumentu určitý text.
ActiveDocument.Range (0, 0) .Text = "Pridať nejaký text"
Otvoriť dokument na premennú
Môžete tiež otvoriť dokument programu Word a okamžite ho priradiť k premennej:
Sub OpenDoc () Dim strFile ako reťazec Dim oDoc ako dokument strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'zmena na cestu k súboru If Dir (strFile) "" Potom' Najprv skontrolujeme, či dokument existuje vôbec na danom mieste Nastaviť oDoc = Documents.Open strFile End If End Sub
Umožní vám to pracovať s dokumentom pomocou premennej oDoc .:
oDoc.Range (0, 0) .Text = "Pridať nejaký text"
Vo všeobecnosti je osvedčeným postupom otváranie premennej, čo vám dáva možnosť ľahko odkazovať na dokument v ktoromkoľvek bode.
Otvorte dokument programu Word z Excelu
Tento postup VBA otvorí dokument programu Word z iného programu MS Office (napr. Excel):
Sub OpenDocFromExcel () Dim wordapp Dim strFile As String strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" Set wordapp = CreateObject ("word.Application") wordapp.Documents.Open strFile wordapp.Visible = True End Sub