Word批量选择表格，宏批量选中表格

Word文中有较多表格，且又未统一设置样式，需要一个个表选中了修改，这里，为大家提供一个VBA实现批量选中全部表格的方法，word原生功能。

在word中使用使用宏VBA，实现批量转PDF：

1、在Word中，打开你需要处理的doc文档；

2、按住键盘ALT+F11，调出VBA窗口;

3、在出现的VBA窗口中，粘贴批量转PDF代码，完整VB代码在文末；

补充：没有任何宏，只看到灰色一片，需要在左边的工程里面“Normal”，展开后的“模块”节点下，鼠标右键，选择“插入-模块”，然后将代码复制进去即可。

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

4、把键盘光标放到任意一行代码上，按键盘F5运行；

5、运行后，切换回doc文档窗口，查看全部表格已经被选中。

6、选择右键表格属性，进行修改，修改后保存即可。