[word] 复杂文本如何仅全选word中的表格 (简单跟做即可)

问题描述

在word文档中,有各种形式的文本,有纯文本,有表格,有图片或者更多其它形式参杂在一起,本篇记录解决如何只全选中文档中的所有表格形式的部分,从而方便对表格进行批量修改和操作

环境说明

word版本:2021专业版(实测版本都差不多,都有对应功能,方法都能用)

操作步骤

1、找到视图->宏->查看宏

打开需要操作的文档,找到上面功能栏的:视图->宏->查看宏

2、创建宏

在弹出的"宏"窗口创建宏

首先在"宏名"下面随便输入你想叫的名字,叫什么都可以,比如我的叫select_all_tables然后点击右侧"创建"

3、宏编辑

点击创建后弹出一个大窗口 ,这里就是编辑刚才创建的宏的地方

首先,把中间框框里面的所有东西删掉,就是下图选中的都删掉,确保全部删除

删除后,把下面这段代码复制,粘贴到刚才的位置

复制代码
'**************************************
' 函数名: SelectAllTables
' 功   能:主要是把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

结果就是下图这样的了

现在就结束了,可以使用了

使用:还在这个页面,点击功能栏的绿色小三角形

注意:第一次运行可能会有点慢(也没有很慢啦),等它没在显示【正在运行】就说明运行结束了

回到需要操作的文档,发现所有表格已经全部被选中了,可以进行批量操作了

刚在编辑宏的大页面可以关掉了,这个方法已经被保存到word应用中,下次直接找到第一步提到的查看宏,点击前面创建的宏运行就能直接全部选中

4、批量操作示例--透明表格边框

下面示例把所有表格的表格线改成透明的:

根据上面的操作,已经选中所有表格

首先右键任一块被选中的表格,选择"表格属性"

然后选择下面的"边框和底纹"

设置 无 确定 确定 即可

相关推荐
witton2 小时前
记一次pdf转Word的技术经历
pdf·乱码·word·pymupdf·mupdf·mupdf.js·winansiencoding
Dxy12393102162 小时前
python合并一个word段落中的run
python·word
来自星星的坤2 小时前
如何优雅地解决AI生成内容粘贴到Word排版混乱的问题?
人工智能·chatgpt·word
giao源6 小时前
JAVA实现将富文本内容插入已有word文档并下载(dock4j+jsoup)
java·开发语言·word
薛定谔的猫-菜鸟程序员1 天前
用Node.js施展文档比对魔法:轻松实现Word文档差异比较小工具,实现Word差异高亮标注(附完整实战代码)
node.js·word·diff算法·word文档差异比较工具
Lxinccode1 天前
Java查询数据库表信息导出Word-获取数据库实现[1]:KingbaseES
java·数据库·word·获取数据库信息·获取kingbasees信息
pyengine2 天前
基于pandoc的MarkDown格式与word相互转换小工具开发(pyqt5)
开发语言·python·qt·word
东方佑2 天前
使用Python创建带边框样式的Word表格
数据库·python·word
Lxinccode2 天前
Java查询数据库表信息导出Word
word·数据库信息导出为word文档
振宇i3 天前
Java 富文本转word
java·word·富文本·docx4j