¿Cómo controlar el diseño del documento Word (márgenes, orientación, tamaño de página) desde Excel?

Para controlar el diseño de un documento de Word desde Excel, puedes utilizar VBA (Visual Basic for Applications) para automatizar el proceso. A continuación, te proporciono un ejemplo básico de cómo hacerlo:

   Sub ControlarDisenoWordDesdeExcel()
       ' Declara las variables
       Dim wdApp As Object
       Dim wdDoc As Object
       
       ' Trata de usar una instancia existente de Word, si no,
       ' crea una nueva.
       On Error Resume Next
       Set wdApp = GetObject(, "Word.Application")
       If wdApp Is Nothing Then
           Set wdApp = CreateObject("Word.Application")
       End If
       On Error GoTo 0
       
       ' Haz visible la aplicación Word
       wdApp.Visible = True
       
       ' Crea un nuevo documento en Word
       Set wdDoc = wdApp.Documents.Add
       
       ' Configura los márgenes del documento
       With wdDoc.PageSetup
           .TopMargin = wdApp.InchesToPoints(1)  ' 1 pulgada de margen superior
           .BottomMargin = wdApp.InchesToPoints(1)  ' 1 pulgada de margen inferior
           .LeftMargin = wdApp.InchesToPoints(1)  ' 1 pulgada de margen izquierdo
           .RightMargin = wdApp.InchesToPoints(1)  ' 1 pulgada de margen derecho
       End With
       
       ' Configura la orientación de la página
       wdDoc.PageSetup.Orientation = 1  ' Usa 1 para orientación horizontal, 0 para vertical
       
       ' Configura el tamaño de página
       wdDoc.PageSetup.PaperSize = wdApp.WdPaperSize.wdPaperA4
       
       ' Limpieza
       Set wdDoc = Nothing
       Set wdApp = Nothing
   End Sub
  • Abre Excel y accede al editor de VBA:
    • Presiona `Alt + F11` para abrir el Editor de VBA.
  • Inserta un nuevo módulo:
    • Haz clic en `Insertar` > `Módulo`.
  • Escribe el siguiente script VBA:
  • Ejecuta el script:
    • Cierra el editor de VBA y regresa a Excel.
    • Presiona `Alt + F8` para abrir la ventana de macros.
    • Selecciona `ControlarDisenoWordDesdeExcel` y haz clic en `Ejecutar`.

Este script configura los márgenes, la orientación y el tamaño de página de un nuevo documento de Word desde Excel. Puedes ajustar los valores según tus necesidades (por ejemplo, cambiar el tamaño de los márgenes o la orientación de la página). Asegúrate de tener los permisos necesarios para ejecutar macros en tu entorno de Excel.

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