¿Cómo establecer el zoom del documento Word desde Excel?

Para establecer el zoom de un documento de Word desde Excel usando VBA (Visual Basic for Applications), puedes crear un macro en Excel que abra el documento de Word y ajuste el nivel de zoom. Aquí te dejo un ejemplo de cómo hacerlo:

Sub CambiarZoomDocumentoWord()
    Dim wdApp As Object
    Dim wdDoc As Object
    Dim path As String
    Dim nivelZoom As Integer
    
    ' Establece la ruta del documento de Word
    path = "C:rutaaldocumentotu_documento.docx"
    ' Establece el nivel de zoom deseado
    nivelZoom = 150  ' Por ejemplo, 150 para un zoom del 150%
    
    ' Inicia Word y abre el documento
    On Error Resume Next
    Set wdApp = GetObject(Class:="Word.Application")
    If wdApp Is Nothing Then
        Set wdApp = CreateObject(Class:="Word.Application")
    End If
    On Error GoTo 0
    
    wdApp.Visible = True ' Asegúrate de que Word esté visible
    Set wdDoc = wdApp.Documents.Open(path)
    
    ' Cambia el nivel de zoom
    wdDoc.ActiveWindow.View.Zoom.Percentage = nivelZoom
    
    ' Opcionalmente, puedes cerrar el documento sin guardar cambios
    ' wdDoc.Close SaveChanges:=False
    
    ' Libera los objetos
    Set wdDoc = Nothing
    Set wdApp = Nothing
End Sub
  • Abre el Editor de VBA en Excel:
    • Presiona `ALT + F11` para abrir el Editor de VBA.
  • Inserta un nuevo módulo:
    • Haz clic en `Insertar` > `Módulo` para crear un nuevo módulo donde vas a escribir el código.
  • Escribe el código:
  • Ajusta el código según tus necesidades:
    • Cambia `»C:rutaaldocumentotu_documento.docx»` por la ruta correcta al documento de Word.
    • Cambia el valor de `nivelZoom` al nivel de zoom que prefieras.
  • Ejecuta el macro:
    • Cierra el Editor de VBA y vuelve a Excel.
    • Presiona `ALT + F8`, selecciona `CambiarZoomDocumentoWord` y haz clic en `Ejecutar`.

Este macro abrirá el documento de Word especificado, cambiará el nivel de zoom y dejará el documento abierto (o puedes cerrar el documento sin guardar cambios si descomentas la línea correspondiente). Asegúrate de tener permisos para ejecutar macros en tu instalación de Office.

Conoce nuestros servicios

Conoce nuestra tienda

Mejora tu nivel y logra tus objetivo

Excel

Excel cursos

Access

cursos de Access

Power BI

cursos power BI

Deja un comentario