Word文档中有几百个表格，如何统一修改样式

核心就是快速选中所有表格

1、进入「开发工具」-「代码」-「Visual Basic」-「插入」-「模块」，将下列代码复制粘贴进去。

2、进入「开发工具」-「代码」-「宏」，在“宏名”中，我们可以看到刚刚添加的名称，点击“运行”按钮，就能够选中文档中所有的表格，进入「设计」-「表格样式」，在这里我们可以选择自己喜欢的样式效果。

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

Application.ScreenUpdating = True

End Sub