word怎么同时选中多个表格

如题所述

ALT+F8,打开宏对话框,创建名为SelectAllTables的宏。代码如下:
Sub
SelectAllTables()
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
保存完成后选择加载该宏即可。
温馨提示:答案为网友推荐,仅供参考
第1个回答  2020-04-23
当鼠标放到表格左上角的时候会自动出现一个四向标的箭头 点击它即可全部选中
如下图
当然
当鼠标放置在表格内任意一位置不去点选时 会出现一斜向右的箭头 此时可以单选一个表格或者拖拉多选多个表格 看个人的习惯了。
相似回答