首页 > Office专区 > Word技巧 >

如何在Word中批量修改表格的格式

来源:互联网 2021-06-06 17:44:23 283

1)建立宏来选择文档中的全部表格:「开发工具」-「Visual Basic」将下列代码复制进去。然后,在「宏」中点击「运行」,就可以选中文档中的所有表格了。L8M办公区 - 实用经验教程分享!

 L8M办公区 - 实用经验教程分享!

代码:L8M办公区 - 实用经验教程分享!

Sub 批量修改表格()L8M办公区 - 实用经验教程分享!

Dim tempTable As TableL8M办公区 - 实用经验教程分享!
Application.ScreenUpdating = FalseL8M办公区 - 实用经验教程分享!
If ActiveDocument.ProtectionType = wdAllowOnlyFormFields ThenL8M办公区 - 实用经验教程分享!
MsgBox "文档已保护,此时不能选中多个表格!"L8M办公区 - 实用经验教程分享!
Exit SubL8M办公区 - 实用经验教程分享!
End IfL8M办公区 - 实用经验教程分享!
ActiveDocument.DeleteAllEditableRanges wdEditorEveryoneL8M办公区 - 实用经验教程分享!
For Each tempTable In ActiveDocument.TablesL8M办公区 - 实用经验教程分享!
tempTable.Range.Editors.Add wdEditorEveryoneL8M办公区 - 实用经验教程分享!
NextL8M办公区 - 实用经验教程分享!
ActiveDocument.SelectAllEditableRanges wdEditorEveryoneL8M办公区 - 实用经验教程分享!
ActiveDocument.DeleteAllEditableRanges wdEditorEveryoneL8M办公区 - 实用经验教程分享!
Application.ScreenUpdating = TrueL8M办公区 - 实用经验教程分享!
End SubL8M办公区 - 实用经验教程分享!

 L8M办公区 - 实用经验教程分享!

2)修改表格属性。通过上面的宏选中表格后,还可以通过「右键」-「表格属性」,对表格中的单元格的高度、宽度等再次统一设置。L8M办公区 - 实用经验教程分享!

3)修改样式:运行刚才录入进去的宏,即可一次选中文档中所有表格,然后,可以在「设计」-「表格样式」-「修改表格样式」。L8M办公区 - 实用经验教程分享!


标签: 何在Word批量修改表格

办公区 Copyright © 2016-2023 www.bgqu.net. Some Rights Reserved. 备案号:湘ICP备2020019561号统计代码