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

1. 引言

我们在使用Word排版编写书籍时候,可能会带有许多表格,上百,甚至上千个表格都是有可能的。这么多的表格对于后期的样式修改是非常不利的,有什么好的方法能够一次性修改文档中所有的表格,将其统一样式呢?

2. 方法

1、利用宏选择所有表格。首先,我们进入开发工具 > Visual Basic,将下列代码复制进去(该宏的主要作用是,可以让你一次选中文档中所有的表格)。然后,在中点击 运行

默认情况下,系统不显示开发工具选项卡。想要在 Office 应用程序中显示开发工具选项卡,如下操作:
文件选项卡, 转到选项 > 自定义功能区
自定义功能区主选项卡下,选中开发工具复选框。

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

20190507212857372.gif


未完 ......

点击访问原文(进入后根据右侧标签,快速定位到本文)

猜你喜欢

转载自www.cnblogs.com/sinicheveen/p/12009610.html