时间：2021-02-28 12:37作者：admin来源：未知人气：1367我要评论(0)
1）建立宏来选择文档中的全部表格：「开发工具」-「Visual Basic」将下列代码复制进去。然后，在「宏」中点击「运行」，就可以选中文档中的所有表格了。
代码：
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
2）修改表格属性。通过上面的宏选中表格后，还可以通过「右键」-「表格属性」，对表格中的单元格的高度、宽度等再次统一设置。
3）修改样式：运行刚才录入进去的宏，即可一次选中文档中所有表格，然后，可以在「设计」-「表格样式」-「修改表格样式」。
相关阅读 word文档去除密码的方法常见办公中word文字处理的5个技巧Word自动生成字帖，无需插件，快速搞定Word实用小技巧，学会了让你成为高手中的高手！如何1分钟批量新建100个word文档？这个办公技巧太强大了！如何利用Word自动编号功能1分钟批量制作100张荣誉证书！Word封面的下划线居然还有这种操作？随意添加内容还能自动对齐！职场人员必会的5个Word技巧，5小时的工作量1小时完成！如何快速无损提取word中的图片，不限量！如何给Word表格跨页显示相同表头，重复标题行
热门文章
word表格外框线如何设置为1.5磅双实线
word排版图片总是乱跑怎么办
Word 合并文档如何保持格式不变
word 拉丁文数字1到10的对照表以及电脑上怎么打出来
最新文章
word文档去除密码的方法
常见办公中word文字处理的5个技巧
Word自动生成字帖，无需插件，快速搞定Word实用小技巧，学会了让你成为高手中的高手！如何1分钟批量新建100个word文档？这个办公技巧太强大了！如何利用Word自动编号功能1分钟批量制作100张荣誉证书！
人气排行 word表格外框线如何设置为1.5磅双实线word排版图片总是乱跑怎么办Word 合并文档如何保持格式不变word 拉丁文数字1到10的对照表以及电脑上怎么打出来word 目录对不齐怎么办，如何解决word 明明是单倍行距，间距却很大平板可以做word文档吗word打字时会消掉后面的字该怎么办？
盖楼回复X
(您的评论需要经过审核才能显示)
查看所有0条评论>>