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.修改样式,所有表格都会改

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

修改居中、行距等:

修改样式等:

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

发布了29 篇原创文章 · 获赞 48 · 访问量 2万+

猜你喜欢

转载自blog.csdn.net/Ace_2/article/details/102977833
今日推荐