在撰写长篇文档(如报告、论文或合同)时,常常会插入多个表格。手动逐个调整表格格式不仅费时,还容易出错。本文将介绍如何在 Microsoft Word 中一键批量调整所有表格的样式、对齐、边框等属性,大幅提升工作效率。
适用于需要一次性修改已有多个表格的情况:
Alt + F11 打开 VBA 编辑器。
Sub ApplyTableStyleToAll()
Dim tbl As Table
For Each tbl In ActiveDocument.Tables
With tbl
.Style = "网格表 4 - 着色 1" ' 可替换为其他样式名
.AllowAutoFit = True
.Range.ParagraphFormat.Alignment = wdAlignParagraphCenter
End With
Next tbl
End Sub
Alt + F8,运行宏即可批量应用样式。.Style 值。