word中100多张表格怎么批量修改格式？

如题所述

举报该文章

相关建议推荐于2019-08-17

第一步，先用宏将所有表格选中：
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 = True
End Sub
第二步，设置格式。先设置好字体字号，再设置表格属性：右键——表格属性（或者点菜单栏的表格——表格属性）——行，选中“指定高度”，在“行高值是”中选择“固定值”，设定一个适当值。

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/fmmss4qf4qq2smfssp4.html

其他看法

第1个回答 2020-05-13

你好！
一个是用宏命令，比较复杂，我也不会用，
我的方法是：SHIFT加选所有表格，统一调格式。
希望对你有所帮助，望采纳。

第2个回答 2018-03-11

先用宏将所有表格选中：
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 = True
End Sub

设置格式。

先设置好字体字号，再设置表格属性：右键——表格属性（或者点菜单栏的表格——表格属性）——行，选中“指定高度”，在“行高值是”中选择“固定值”，设定一个适当值。

第3个回答 2018-01-13

相似回答

怎么批量调整word中多个表格怎么批量调整word中多个表格的大小_百度知 ...答：批量调整Word中多个表格的方法是通过使用快捷键或者鼠标操作，将选中的表格进行统一的格式调整或大小调整。可以先选中所有需要调整的表格，然后通过设置表格样式、调整边框颜色、字号和行距等方式来批量调整各个表格的格式。也可以在页面布局中统一设置表格列宽、行高等参数。此外，还可以通过插入表格模板的方式来...

大家正在搜

word表格格式怎么调整 word怎么复制表格保持原有格式 word表格放不到一张上怎么办 word文档怎么做表格 word怎么复制表格 word复制表格保留原格式 excel怎么转换成word格式 word格式刷怎么用 word表格样式怎样设置