如何选中word里的所有表格?

如题

ctrl+F----->表格,即可一次性选择word中的所有表格。-----<注:这是一个错误的答案,抱歉。下面有正确的答案,往下看。>

针对此回答,引来不少人的质疑和嘲笑,非常抱歉和遗憾;因为当时自己有个类似的需求,得知有该方法,遇到该问题时,当时觉得和自己当时遇到的问题一样就回答了。确实我说的这个方法只能是一次性突出显示word里的包含表格的标题,且该表格所属的标题必须做了级别设定,而且只是在导航窗格里黄色突出显示而已,好处是能看出来有级别设定的表格有多少,不是选中。如下图。


另回答一下本问题:“如何一次性选中word里的所有表格“



1 将下面的脚本复制(在最后哦,也是网上找的)

2 word---视图---宏----查看宏----输入宏名:SelectAllTables----点击创建(参图1)

3 将脚本编辑窗口中的默认代码删掉,粘贴1步复制的脚本,保存并关闭(参图2)

4 word---视图---宏----查看宏----运行刚创建的宏(参图1)


   在word中查看,所有表格已为选中状态。

   


   

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个回答  2012-04-19
我不知道为什么要选中表格,但是如果你想要修改格式的话,可以在“样式与格式”中将每个表格的边框和底纹等都设置成一种样式,这个也需要一个一个选(选择表格的时候,可以在纵向滚动条下面的有一个小圆圈,单击它,就出一个对话框,选择表格,然后你再点上下键时,光标会自动跳到表格上),等你需要改所有表格样式的时候,只需要改这个样式就可以了。如果是你需要其他作用,这个方法不适用
第2个回答  2015-08-07
  一、Word如何删除表格之快捷键
  1、鼠标移到表格上,单击表格左上角的带箭头的十字架选中表格。
  2、按 Shift + Delete(或 Backspace),表格连同内容一并被删除。
  二、Word如何删除表格之右键
  1、移鼠标到表格上,点击表格左上角的带箭头的十字架选中它,右键表格。
  2、选择“删除表格”,则整个表格被删除,这是Word去除表格右键法。
第3个回答  2012-04-19
你的文档是有文字又有表格吗?如果表格数量不多的话,你可以:当你的鼠标放到表格左上角时,会出现一个田字框,点击田字框——按住ctrl键——点击另一个表格左上角的田字框——以此类推——这样就选到了,不过如果表格数量多的话,这个是最普通的办法
第4个回答  2012-04-19
如果你的文件里只有一个表,选中左上角的田字框
如果是多个表,按住Ctrl一个一个的添加
相似回答