Odprite Wordov dokument
Ta Word VBA makro bo odprl Wordov dokument iz podanega imenika:
Sub OpenDoc () Dim strFile As String strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'spremenite pot vaše datoteke Če Dir (strFile) "" Potem' Najprej preverimo, ali dokument sploh obstaja podana lokacija Dokumenti.Odprite strFile End If End Sub
Zdaj lahko z objektom ActiveDocument komunicirate z novo odprtim dokumentom. Ta koda bo dokumentu dodala nekaj besedila.
ActiveDocument.Range (0, 0) .Text = "Dodaj nekaj besedila"
Odpri dokument za spremenljivko
Odprete lahko tudi Wordov dokument in ga takoj dodelite spremenljivki:
Sub OpenDoc () Dim strFile As String Dim oDoc kot Document strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'spremenite pot vaše datoteke Če Dir (strFile) "" Potem' Najprej preverimo, če je dokument sploh obstaja na danem mestu Nastavite oDoc = Dokumenti.Odprite strFile End End If End Sub
Omogoča interakcijo z dokumentom prek spremenljivke oDoc .:
oDoc.Range (0, 0) .Text = "Dodaj nekaj besedila"
Na splošno je najboljša praksa, da odprete spremenljivko, kar vam omogoča, da se kadar koli preprosto sklicujete na dokument.
Odprite Wordov dokument iz Excela
Ta postopek VBA odpre Wordov dokument iz drugega programa MS Office (npr. 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 Pod