Word VBA - Macro para abrir documento de Word

Abrir documento de Word

Esta macro de Word VBA abrirá un documento de Word desde el directorio especificado:

Sub OpenDoc () Dim strFile As String strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'cambiar a la ruta de su archivo If Dir (strFile) "" Entonces' Primero verificamos si el documento existe en ubicación dada Documents.Open strFile End If End Sub

Ahora puede interactuar con el documento recién abierto con el objeto ActiveDocument. Este código agregará algo de texto al documento.

ActiveDocument.Range (0, 0) .Text = "Agregar texto"

Abrir documento a variable

También puede abrir un documento de Word, asignándolo inmediatamente a una variable:

Sub OpenDoc () Dim strFile As String Dim oDoc as Document strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" 'cambiar a la ruta de su archivo If Dir (strFile) "" Entonces' Primero verificamos si el documento existe en absoluto en la ubicación dada Set oDoc = Documents.Open strFile End If End Sub

Permitiéndole interactuar con el documento a través de la variable oDoc .:

oDoc.Range (0, 0) .Text = "Agregar texto"

Por lo general, es una buena práctica abrir una variable, lo que le brinda la posibilidad de hacer referencia al documento fácilmente en cualquier momento.

Abrir documento de Word desde Excel

Este procedimiento de VBA abrirá un documento de Word desde otro programa de MS Office (por ejemplo, Excel):

Sub OpenDocFromExcel () Dim wordapp Dim strFile As String strFile = "c: \ Users \ Nenad \ Desktop \ Test PM.docm" Establecer wordapp = CreateObject ("word.Application") wordapp.Documents.Open strFile wordapp.Visible = True End Sub