word中一次选取所有表格

在编辑一个较长的文稿时，如果需要改变所有表格的字体或格式等，逐个调整肯定很辛苦，可以一次选择所有表格一下子搞定当然就省好多事了。具体操作方法：ALT+F8,打开宏对话框，创建名为SelectAllTables的宏。代码如下：SubSelectAllTables()DimtempTableAsTableApplication.ScreenUpdating=False'判断文档是否被保护IfActiveDocument.ProtectionType=wdAllowOnlyFormFieldsThenMsgBox文档已保护，此时不能选中多个表格！ExitSubEndIf'删除所有可编辑的区域ActiveDocument.DeleteAllEditableRangeswdEditorEveryone'添加可编辑区域ForEachtempTableInActiveDocument.TablestempTable.Range.Editors.AddwdEditorEveryoneNext'选中所有可编辑区域ActiveDocument.SelectAllEditableRangeswdEditorEveryone'删除所有可编辑的区域ActiveDocument.DeleteAllEditableRangeswdEditorEveryoneApplication.ScreenUpdating=TrueEndSub保存完成后选择加载该宏即可。