怎么通过制表位搞定开头下划线?小Q来教您一个解决的方法。......
2023-01-18
这篇文章跟大家分享如何为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”样式。
相关文章