案例一如果文档中的表格比较少，比如像下图这样只有2个，可以按住ctrl键同时选中这2个表格。接着在“表格工具”“设计”选项卡“表格样式”功能组中单击右侧的“其他”按钮。下面以批量设置3张表格的样式为例进行演示，更多数量的表格也可以用同样的代码。
大家好，这篇文章跟大家分享如何为Word中不同的表格统一应用相同的表格样式。
案例一如果文档中的表格比较少，比如像下图这样只有2个，可以按住ctrl键同时选中这2个表格。接着在“表格工具”“设计”选项卡“表格样式”功能组中单击右侧的“其他”按钮。在弹出的下拉列表中选择一种想要的样式，这里选择“网格表4-着色4”。这样2张表格就一次性应用了相同的表格样式。
案例二如果文档中的表格数量比较多，按ctrl键同时选中会不太方便，我们可以通过宏代码批量设置所有表格样式。下面以批量设置3张表格的样式为例进行演示，更多数量的表格也可以用同样的代码。
操作步骤：
1.在“开发工具”选项卡“代码”功能组中单击“录制宏”按钮。
2. 在打开的“录制宏”对话框中设置“宏名”，这里设为“统一表格样式”，设置“将宏保存在” “演示文档”（当前文档）中，最后单击“确定”按钮。
3.返回文档，选中第1个表格，在“表格工具”“设计”选项卡“表格样式”功能组中单击右侧的“其他”按钮，在下拉列表中选择想要的样式，这里选择“网格表4-着色3”。
（这一步操作可参照前面案例一中的表格样式设置办法）
4.在“开发工具”选项卡“代码”功能组中单击“停止录制”按钮。
5.继续在“代码”功能组中单击“宏”按钮。
6.在打开的“宏”对话框中，单击右侧的“编辑”按钮。
7.在打开的VBA编辑器窗口中，在中间的代码编辑区域对默认代码进行修改，修改后的代码如下：
Sub 统一表格样式()
'
' 统一表格样式 宏
'
'
For i = 1 To ActiveDocument.Tables.Count
ActiveDocument.Tables(i).Style = "网格表 4 - 着色 3"
Next i
End Sub
代码修改前
代码修改后
8. 单击VBA编辑器窗口上方工具栏中的“运行子过程／用户窗体”按钮运行代码，即方向向右的绿色三角形。
9.返回文档，可见所有表格已经统一应用了“网格表4-着色3”样式。
#office办公技能#
