Word VBA - Makro för att öppna Word -dokument

Öppna Word -dokument

Detta Word VBA -makro öppnar ett word -dokument från den angivna katalogen:

Sub OpenDoc () Dim strFile As String strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'ändra till sökvägen till din fil Om Dir (strFile) "" Sedan "Först kontrollerar vi om det finns dokument alls given plats Documents.Open strFile End If End Sub

Nu kan du interagera med det nyöppnade dokumentet med ActiveDocument Object. Denna kod kommer att lägga till lite text i dokumentet.

ActiveDocument.Range (0, 0) .Text = "Lägg till lite text"

Öppna dokument till variabel

Du kan också öppna ett Word -dokument och omedelbart tilldela det till en variabel:

Sub OpenDoc () Dim strFile As String Dim oDoc as Document strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'ändra till sökvägen till din fil Om Dir (strFile) "" Sedan "Först kontrollerar vi om dokument existerar överhuvudtaget på en given plats Ange oDoc = Documents.Open strFile End If End Sub

Tillåter dig att interagera med dokumentet via variabeln oDoc .:

oDoc.Range (0, 0) .Text = "Lägg till lite text"

I allmänhet är det bästa praxis att öppna för en variabel, vilket ger dig möjlighet att enkelt referera till dokumentet när som helst.

Öppna Word -dokument från Excel

Denna VBA -procedur öppnar ett Word -dokument från ett annat MS Office -program (ex. 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