Word批量修改表格里的内容？

WORD中批量修改表格的格式：

第一步，先用宏将所有表格选中：Sub 宏1() Dim mytable As Table Application.ScreenUpdating = False For Each mytable In ActiveDocument.Tables mytable.Range.Editors.Add wdEditorEveryone Next ActiveDocument.SelectAllEditableRanges (wdEditorEveryone) ActiveDocument.DeleteAllEditableRanges (wdEditorEveryone) Application.ScreenUpdating = TrueEnd Sub第二步，设置格式。先设置好字体字号，再设置表格属性：右键——表格属性（或者点菜单栏的表格——表格属性）——行，选中“指定高度”，在“行高值是”中选择“固定值”，设定一个适当值。

第一步，先用宏将所有表格选中：Sub 宏1()Dim mytable As TableApplication.ScreenUpdating = FalseFor Each mytable In ActiveDocument.Tablesmytable.Range.Editors.Add wdEditorEveryoneNextActiveDocument.SelectAllEditableRanges (wdEditorEveryone)ActiveDocument.DeleteAllEditableRanges (wdEditorEveryone)Application.ScreenUpdating = TrueEnd Sub第二步，设置格式。先设置好字体字号，再设置表格属性：右键——表格属性（或者点菜单栏的表格——表格属性）——行，选中“指定高度”，在“行高值是”中选择“固定值”，设定一个适当值。

方法步骤如下：

1、打开需要操作的WORD文档，按住“Ctrl”键，一次选中需要调整的表格。

2、在选中的区域内点击鼠标右键，选择“表格属性”。

3、在“行”标签输入行高，并点击确定按钮。

4、在列标签也输入合适的列宽并点击确定按钮即可。

5、返回主文档，发现通过调整的表格格式已经统一。