KutoolsforOffice— 一套方案,五大工具。事半功倍。

如何在 Word 中一次性选中所有 Word 对象?

作者Amanda Li修改日期

如果您已经在文件中插入了多个嵌入式 Word 文档对象,逐一选择会非常繁琐。本教程将为您介绍如何通过 VBA 宏,或借助 Kutools for Word,一键快速选中所有嵌入式 Word 对象。

使用 VBA 选中所有嵌入式 Word 文档对象

使用 Kutools for Word 选中所有嵌入式 Word 文档对象

推荐适用于 Word 的高效生产力工具

Kutools for Word:AI 集成🤖,100 多项高级功能助您文档处理效率提升 50%。免费下载

Office Tab:为 Word 及其他 Office 工具带来类似浏览器的标签页功能,多文档切换更便捷高效。免费下载


使用 VBA 选中所有嵌入式 Word 文档对象

与其手动逐一选择嵌入式 Word 对象,不如通过 VBA 一键自动选中所有对象。操作方法如下:

  1. 按下 Alt + F11,即可打开 Microsoft Visual Basic for Applications 窗口。
  2. 在“插入”选项卡中点击“模块”,然后将以下代码粘贴到模块窗口中。
    Sub SelectAllEmbedWordObject()
    Dim tempTable As InlineShape
    Application.ScreenUpdating = False
    ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
    For Each tempTable In ActiveDocument.InlineShapes
        If InStr(tempTable.OLEFormat.ProgID, "Word") = 1 Then
            tempTable.Range.Paragraphs(1).Range.Editors.Add wdEditorEveryone
        End If
    Next
    ActiveDocument.SelectAllEditableRanges wdEditorEveryone
    ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
    Application.ScreenUpdating = True
    End Sub
  3. 点击运行按钮运行,或按下 F5 即可执行代码。
Office Tab:为 Word、Excel、PowerPoint 带来标签式界面……
使用 Office Tab 浏览文档
立即提升您的工作流程。      了解更多 Office Tab 详情      立即免费下载

使用 Kutools for Word 选中所有嵌入式 Word 文档对象

如果您追求更简便的操作,Kutools for Word 可让您无需 VBA 编程,仅需一键即可选中所有嵌入式 Word 文档对象。您可以选择整个文档,也可以仅选中指定区域内的对象。

Kutools for Word搭载 AI 功能🤖,提供超过 100 项实用功能,助您轻松完成各类任务。
  1. 点击 Kutools > 段落 > 选取包含嵌入式 Word 对象的段落。
    在功能区的 Kutools 选项卡中选择所有嵌入式 Word 对象段落选项

注意:如果在使用此工具前已选中文档部分内容,则仅会选择该选中范围内的嵌入式 Word 对象。

Kutools for Word 是终极的 Word 插件,能够简化您的工作流程并提升文档处理效率。立即获取!

最佳办公效率工具

Kutools for Word——集成超过 100 项卓越功能,全面提升您的 Word 体验!

🤖KUTOOLS AI 功能AI 助手/实时助手/超级润色(保留格式)/超级翻译(保留格式)/AI 遮挡/AI 校正……

📘 文档精通分割页面/文档合并/批量选择导出为多种格式(PDF/TXT/DOC/HTML……)/批量转换为 PDF……

内容编辑批量查找与替换跨多个文件/统一调整所有图片大小/调整翻转表格行列/表格转文本……

🧹 轻松清理:一键清除多余空格/分节符/文本框/超链接/ 想要更多清理工具,请前往移除分组……

创意插入:插入千位分隔符/复选框/选项按钮/二维码/条形码/多图插入/ 更多插入选项请查看插入分组……

🔍 精准选择:快速定位特定页面/表格/形状/标题段落/ 利用更多选择功能提升导航效率……

明星增强功能跳转到任意位置/自动插入重复文本/在多个文档 Windows 间切换/11 转换工具……

🌍 支持 40+ 种语言:无论您身处何地,Kutools 均支持英语、西班牙语、德语、法语、中文等 40 多种语言!

Kutools for Word
 
 

Office Tab- 为 Office 带来标签式界面,让您的工作更轻松高效

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中,轻松启用标签式编辑与阅读功能。
  • 在同一窗口中打开和创建多个文档标签,而非在新窗口中分别打开。
  • 让您的工作效率提升 50%,每天为您减少数百次鼠标点击!

✨ Kutools for Office —— 一次安装,畅享五大强力工具!

包含 Office Tab Pro·Kutools for Excel·Kutools for Outlook·Kutools for Word·Kutools for PowerPoint

📦 一套打包 5 个工具 | 🔗 与 Microsoft Office 无缝集成 | ⚡ 保存时间,立即提升效率

最佳办公效率工具

Kutools for Word- 100+ 款 Word 工具