☰

如何一次性更改所有 Word 表格的列宽

tag-icon • tag-icon microsoft-word microsoft-word-2013
如何一次性更改所有 Word 表格的列宽

我在 Word 中有很多（> 200 个）具有相同布局（两列、六行）的表格。

我需要调整所有列的列宽。有没有办法自动完成这个操作？

答案1

您可以使用 VBA 宏来调整每个表格的大小。

在 Word 中按ALT+F11并在下方插入宏项目 » 本文档.
使用以下命令执行代码F5

Sub resizeTables()    
  For Each Table In ActiveDocument.Tables
    On Error Resume Next
    Table.Columns(1).Width = 200
    Table.Columns(2).Width = 300
    On Error GoTo 0
  Next    
End Sub
  • Columns(2)代表每个表中的第 2 列
  • 该值Width = 300是您想要的像素宽度。请根据需要进行更改。
  • 如果您的表格中的列数少于 VBA 宏中的列数，您将收到异常。为此，我添加了On Error Resume Next忽略错误并On Error GoTo 0停止此错误处理

相关内容