Word VBA - Makro za otvaranje Word dokumenta

Otvorite Wordov dokument

Ovaj Word VBA makro otvorit će Wordov dokument iz navedenog direktorija:

Sub OpenDoc () Dim strFile As String strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'promijenite u putanju vaše datoteke Ako Dir (strFile) "" Zatim' Prvo provjerimo postoji li dokument uopće na datoj lokaciji Documents.Open strFile End If End Sub

Sada možete komunicirati s novootvorenim dokumentom s objektom ActiveDocument. Ovaj kôd će dodati neki tekst u dokument.

ActiveDocument.Range (0, 0) .Text = "Dodaj tekst"

Otvorite dokument za varijablu

Također možete otvoriti Wordov dokument, odmah ga dodijeliti varijabli:

Sub OpenDoc () Dim strFile As String Dim oDoc kao Document strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'promijenite u putanju vaše datoteke Ako Dir (strFile) "" Zatim' Prvo provjerimo je li dokument postoji uopće na zadanom mjestu Postavi oDoc = Dokumenti.Otvori strFile End End If End Sub

Omogućava vam interakciju s dokumentom putem varijable oDoc .:

oDoc.Range (0, 0) .Text = "Dodaj tekst"

Općenito, najbolja je praksa otvoriti varijablu, što vam daje mogućnost da se lako pozivate na dokument u bilo kojem trenutku.

Otvorite Wordov dokument iz programa Excel

Ovaj postupak VBA otvorit će Wordov dokument iz drugog 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