luda
编辑Word长文档时，一个文档通常包含许多表单。如果修改所有表的样式或要求删除文档中的所有表单，您会怎么办？(大卫亚设，Northern Exposure(美国电视剧)，Northern Exposure)。
要设置一个样式吗？还是逐个删除表？这些方法都显然不可取。
一次编辑文件中所有表格的好方法是什么？今天，如果小编与大家分享两个VBA技巧，将有助于我们一次性批量处理表格。又快又专业~
01一次性修改文档中的所有表格样式
为了美化文件，我们一般会统一文件中的所有表格样式，如何快速完成，这里小编教我们大量设置表格样式的技术。
步骤1:直接按Alt F11键打开“VBA代码”窗口。
步骤2:在打开的VBA窗口中，在Thisdocument上单击鼠标右键，然后从弹出菜单中选择“插入-模块”选项。
步骤3:将打开“模块1(代码)”窗口，并将以下代码复制并粘贴到模块中：
Sub批量修改表单()
Dim tempTable As Table
A=False
If Ac=wdAllowOnlyFormFields Then
“MsgBox”文档受保护，现在无法选择多个表单！”单击“”
Exit Sub
End If
Ac wdEditorEveryone
For Each tempTable In Ac
WdEditorEveryone
next
Ac wdEditorEveryone
Ac wdEditorEveryone
A=真
End Sub
步骤4:单击三角形的“执行”按钮执行代码，最小化代码窗口。此时，文档中的所有表单都将被选中(此时，请小心不要对鼠标执行其他操作)。然后只需从“表设计”-“表样式”下拉列表中选择所需的样式即可。
现在，您可以看到文档中的所有表样式都已更改为刚刚选择的样式效果！
提示：如果按Alt F11键无法打开VBA窗口，则可以单击“文件”-“选项”，在打开的“Word选项”对话框的“自定义功能区”中选中“开发工具”复选框。如果返回到Word界面并展开“开发工具”菜单，则最左侧会显示“visual Basic”编辑器按钮。
02一次性删除文档中的所有表格
在某些情况下，文档不需要格式化，因此必须删除所有格式。如何快速删除文档中的所有表格？或者使用VBA代码实现。
步骤1:按Alt F11打开VBA窗口代码。
步骤2:在打开的VBA窗口中，在Thisdocument上单击鼠标右键，然后从弹出菜单中选择“插入-模块”选项。
步骤3:在VBA窗口中输入或复制以下代码：
Sub Removetables()
Dim oTable As Table
For Each oTable In Ac
OTable。Delete
Next oTable
End Sub
步骤3:运行代码，最小化代码窗口。返回到Word界面后，您会发现文档中的表单一次全部删除。
请注意，保存带有VBA的文档时，如果出现提示对话框，则必须选择“否”。然后宏使用文档*。必须另存为docm。否则，宏将丢失。
看完之后不要忘记传达收集~