Word 文档批量修改表格

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

Word中怎么批量修改所有表格样式

适用于在有很多表格的时候,想一次性修改所有表格的样式。

比如说,我这里有3张表格:

怎么做呢

1.先把开发工具菜单调出来,开发工具菜单默认情况下不在WORD中菜单栏显示,需要自己调。

文件 > 选项 > 自定义功能区 > 勾选开发工具就有了

2.利用宏选择所有表格

点击开发工具 > Visual Basic 选择 "插入" > “模块”

将下列代码复制进去(该宏的主要作用是,可以让你一次选中文档中所有的表格)

Sub 批量修改表格()

Dim tempTable As Table

Application.ScreenUpdating = False

If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then

MsgBox "文档已保护,此时不能选中多个表格!"

Exit Sub

End If

ActiveDocument.DeleteAllEditableRanges wdEditorEveryone

For Each tempTable In ActiveDocument.Tables

tempTable.Range.Editors.Add wdEditorEveryone

Next

ActiveDocument.SelectAllEditableRanges wdEditorEveryone

ActiveDocument.DeleteAllEditableRanges wdEditorEveryone

Application.ScreenUpdating = True

End Sub

3.关掉窗口,选择开发工具中的宏,运行刚才插入的宏,即可选择所有表格

选中了所有表格

4.修改样式,所有表格都会改

例如:修改磅值、字体等:

修改居中、行距等:

修改样式等:

这样的话,基本能满足批量修改表格的需求了,只有一些只修改表格部分属性而不是整体属性的需求做不到(例如只修改标题行)。在工作量较大的情况下使用这种方法能节省非常多的时间,还更加准确,不会遗漏。

相关文档
最新文档