Cómo aplicar un mismo estilo a todas las tablas de un documento de Word usando una macro

Si necesitas aplicar un formato uniforme a todas las tablas en un documento de Word, puedes utilizar una macro de VBA (Visual Basic for Applications). A continuación, te explicamos paso a paso cómo lograrlo:
Paso 1: Abrir el Editor de Visual Basic
- Abre Microsoft Word y carga el documento donde deseas aplicar el formato.
- Presiona
Alt + F11para abrir el Editor de Visual Basic para Aplicaciones (VBA).
Paso 2: Crear un nuevo módulo
- En la ventana de VBA, haz clic en “Insertar” > “Módulo”.
- Se creará un nuevo módulo en el proyecto de VBA.
Paso 3: Escribir el código de la macro
Copia y pega el siguiente código en la ventana del módulo:
Sub AplicarEstiloATodasLasTablas()
Dim tbl As Table
' Recorrer todas las tablas del documento
For Each tbl In ActiveDocument.Tables
tbl.Style = "Tabla con cuadrícula 4 - Énfasis 5"
Next tbl
End Sub
Paso 4: Ejecutar la macro
- Cierra el Editor de VBA.
- En Word, presiona
Alt + F8para abrir la lista de macros. - Selecciona “AplicarEstiloATodasLasTablas” y haz clic en Ejecutar.
Explicación del código
For Each tbl In ActiveDocument.Tablesrecorre todas las tablas del documento.tbl.Style = "Tabla con cuadrícula 4 - Énfasis 5"asigna el estilo especificado a cada tabla.
Consideraciones
- El nombre del estilo debe coincidir exactamente con el que aparece en Word.
- Puedes cambiar el estilo por otro que prefieras, siempre que exista en la galería de estilos de Word.
Con este sencillo procedimiento, puedes asegurarte de que todas las tablas de tu documento tengan un formato uniforme de manera rápida y eficiente.