word神技1秒统一全部表格样式.docxVIP

Word 神技， 1 秒统一全部表格样式 有一位妹纸曾向 King 有一位妹纸曾向 King 老师提过一个问题： 份 100 多 页的 Word 文档中，有很多的表格，表格样式各不相同。有 什么办法可以快速统一？她的文档是一份标书，不便公开， 图可以大概看出当时她那文档的样子。五颜六色， 图可以大概看出当时她那文档的样子。 五颜六色， 简直不忍心看）除了手工一个一个改，还有没有更加便捷高 效的方法， 可以一次性统一美化呢？当然有， 只要请出“扫地 僧”录制宏，就能轻松解决。宏是 僧” 录制宏，就能轻松解决。 宏是 Office 软 件中的「扫地僧」 ，功夫却深不可测，简直就是神一般的存 在。当你面对大量重复操作， 找不到解决方法时， 请它出山， 必有奇效。录制宏，是一部动作录像机。能够将你在word 必有奇效。录制宏，是一部动作录像机。能够将你在 word 中的部分操作录制下来，自动生成一个代码程序，下一次要 做同样的操作时，执行该程序就能自动完成。不知道 做同样的操作时，执行该程序就能自动完成。 不知道 你有没有注意到， 幻方秋叶 PPT 公众号的文章， 序号通常都 是「? ? ? 」的类型，而不是普通的「 1. 2. 3. 」，难道小编是 个个替换的？当然不！通过录制宏，一次操作，即可永远 使用，一劳永逸！下面就用这个案例教你，如何录制宏 单击【视图】 选项卡中的 【宏】 单击【视图】 选项卡 中的 【宏】 -【录制宏】，出现【录制宏】 对话框。由于【录制宏】用的太多，甚至于在 Office2016 对话框。 的底部状态栏里，也有了快捷按钮，直接点击即可开始录制 了~ 在【宏名】框中，输入宏的名称，写清楚功能，便于以后调用。 在【将宏保存在】 框中，选择宏的保存位置。 认是「所有文档 （Normal.dotm） 」，这样以后所有文档都可以 使用这个宏。如果只想在当前文档使用， 就选择当前文档 （比 如我选择的就是当前文档「周二 Word... 」）。 单击【确定】 按钮，开始录制宏。成功开始录制以后，鼠标旁边会多一个 。点录音带图标。 此时所做的操作会被记录下来。 录制完毕后， 点击状态栏的【停止录制】（就是那个■），停止录制宏 击【视图】【- 宏】，选择自己录好的那个宏， 即可使用。 。点 样的道理，我还可以把引号的替换、空白区域的删除，统统 做到一个宏里面，点几下就搞定格式，妥妥的 ~通过「录制 宏」，很多批量处理，都可以被我们轻松搞定，甚至，不用 写一行代码！ 不过，开头提到的表格样式一键统一， 仅有「录 制宏」还不够。该怎么处理？继续往下看回到开头的 制宏」还不够。该怎么处理？继续往下看 回到开头的 那个问题，如何快速统一文章中所有表格的样式？直接上操 作！ 按下录制按钮，开始录制修改一个表格样式， 作！ 按下录制按钮，开始录制 修改一个表格样式， 并结束录制成功开始录制以后，鼠标旁边会多一个录音带图 标。此时所做的操作会被记录下来。只需要修改其中个表格就行。修改完成以后，再次点击录制按钮，则停止 标。此时所做的操作会被记录下来。只需要修改其中 个表 格就行。 修改完成以后，再次点击录制按钮，则停止 录制。 修改代码，让动作循环重复同时按下 Alt+F8 ，进入 VBA 代码界面， 编辑刚才录制好的宏。 接下来要做一个非常 关键的操作，就是将录制好的一次操作，应用到当前文档中 的所有表格上。因此，代码要做点小修改： a. 计算当前文档 取数据(抽奖) 当然，聪明的你一定已经想到了，搜 取数据(抽奖) 当然，聪明的你一定已经想到了，搜 中表格的总数b.从第一个表格开始应用修改， 直到最后一个 为止。修改过程看着很晕？没关系，看修改以后的代 为止。 修改过程看着很晕？没关系，看修改以后的代 码，只是添加了红字部分，修改了蓝色字而已： Sub 统一表 格样式 ()统一表格样式宏 For i = 1 ToActiveDocument.Tables.Count 计算当前文档中的表格总 数,ActiveDocument.Tables(i).Style = 网格表 4修改当前文 档中第 i 个表格的样式 “网格表4”是录制时选择的样式名称 Next i 修改完成后，继续修改下一个，直到 i 等于表格总数 时停止 End Sub 至于这里面「 」单引号开头的绿色文字， 其实是 King 写上去的注释，帮助大家理解代码，删掉也会 不影响代码运行的 ~* 可以直接复制粘贴以上代码到你的编 辑器中， 执行代码，一次完成运行宏，就能将文档中所有 的表格统一样式了。通过「录制宏」就可以帮我们解 的表格统一样式了。 通过「录制宏」就可以帮我们解 决很多批量处理的问题，更可以帮助不会写代码的人生成 份代码的主体。要知道，对于不懂 VB