word中怎么一次选中所有表格

如题所述

1、打开word文档,切换到“视图”选项、标签、点击“宏”选项,然后下拉箭头点击“查看宏”选项或者直接快捷键Alt+F8;

2、在弹出的宏创建对话框,输入宏名字(可以是中文),然后点击右侧“创建”按钮;

3、用所给的代码替换掉默认的内容:Sub SelectAllTables()、Application.ScreenUpdating = False '判断文档是否被保护 If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then MsgBox "文档已保护,此时不能选中多个表格!";

4、粘贴完代码后,直接点击工具栏的运行按钮▶,此时文档中所有表格已经选中,关闭VBA编辑器即可。

温馨提示:答案为网友推荐,仅供参考
第1个回答  2019-06-13

1、打开word文档,切换到“视图”标签-点击“宏”下拉箭头-点击“查看宏”。

2、在弹出的宏创建对话框,输入宏名字(可以是中文),然后点击右侧“创建”按钮。

3、用所给的代码替换掉默认的内容:Sub SelectAllTables()、Application.ScreenUpdating = False '判断文档是否被保护 If ActiveDocument.ProtectionType = wdAllowOnlyFormFields Then MsgBox "文档已保护,此时不能选中多个表格!";

4、粘贴完代码后,直接点击工具栏的运行按钮▶,此时文档中所有表格已经选中,关闭VBA编辑器。(再次运行宏的话,直接Alt+F8打开对话框,选中宏点击右侧“运行”)

5、回到文档,在“表格工具”-设计-设置框线粗细-边框下拉菜单里点击“所有边框”,如果点击一次“所有边框”是取消掉所有表格的框线,接着再点一次“所有框线”即可。

6、最后再检查从前往后检查一下,这个设置好像会把表格单元格内斜线取消掉,需要重新加一下。

本回答被网友采纳
第2个回答  2017-11-15

除非是整篇文档中都是表格,否则,你这个要求就需要用到VBA(宏命令)了。

给你一段代码,在word文档中创建宏,然后把以上代码复制粘贴到宏里边,然后运行这个宏,它就可以帮你一次选中文档中的所有表格了。代码如下(或者到百度文库里下载这个文档【word,全选文档中所有表格】):

Sub 全选所有表格() ' 

' 全选所有表格 Macro ' 

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

本回答被网友采纳
第3个回答  2017-04-07

表格的左上角,点击下,出现十字的图标,选中,就会出现该表格了。另外,如果你需要选中一片文章的 若干个分开的表格,建议Ctrl+a 后,删除文字项。选中表格

第4个回答  2021-05-26

选中表格文字。步骤:菜单栏,开始→编缉→选择格式相似的文本,可选中全文的表格。

本回答被网友采纳
相似回答