如何一次性选中 Word 文档中所有嵌入的 Visio 对象？
如果您的 Word 文档中包含多个嵌入的 Visio 对象，逐一手动选择会非常繁琐。本文将为您介绍两种方法，助您快速选中文档中的所有嵌入 Visio 对象。
使用 Kutools for Word 选中全部嵌入 Visio 对象
推荐适用于 Word 的高效生产力工具
Kutools for Word：AI 集成🤖，100 多项高级功能助您文档处理效率提升 50%。免费下载
Office Tab：为 Word 及其他 Office 工具带来类似浏览器的标签页功能，多文档切换更便捷高效。免费下载
使用 VBA 选中全部嵌入 Visio 对象
与其手动逐个选择每一个嵌入的 Visio 对象，不如通过 VBA 宏一键快速选中所有对象。具体操作步骤如下：
- 按下 Alt + F11，即可打开 Microsoft Visual Basic for Applications 窗口，轻松开启高效编辑体验。
- 单击“插入”>“模块”，并将以下代码粘贴到模块窗口中：
Sub SelectAllEmbedWordObject() Dim tempTable As InlineShape Application.ScreenUpdating = False ActiveDocument.DeleteAllEditableRanges wdEditorEveryone For Each tempTable In ActiveDocument.InlineShapes If InStr(tempTable.OLEFormat.ProgID, "Visio") = 1 Then tempTable.Range.Paragraphs(1).Range.Editors.Add wdEditorEveryone End If Next ActiveDocument.SelectAllEditableRanges wdEditorEveryone ActiveDocument.DeleteAllEditableRanges wdEditorEveryone Application.ScreenUpdating = True End Sub - 单击
按钮或按下 F5 即可运行代码。
按钮或按下 Office Tab：为 Word、Excel、PowerPoint 带来标签式界面…… |
立即提升您的工作流程。 了解更多 Office Tab 详情 立即免费下载 |
使用 Kutools for Word 选中全部嵌入 Visio 对象
如果您不熟悉宏，或更倾向于简单操作，Kutools for Word 为您提供一键式解决方案。通过其“选择嵌入 Visio 对象段落”功能，您可以瞬间选中所有文档中的 Visio 对象。
- 点击 Kutools > 段落（位于选择组）> 选择包含嵌入 Visio 对象的段落。
注意：如果在使用此工具前已选中部分文档内容，则只会选中该范围内嵌入的 Visio 对象。
最佳办公效率工具
Kutools for Word——集成超过 100 项卓越功能，全面提升您的 Word 体验！
🤖KUTOOLS AI 功能：AI 助手/实时助手/超级润色（保留格式）/超级翻译（保留格式）/AI 遮挡/AI 校正……
📘 文档精通：分割页面/文档合并/批量选择导出为多种格式（PDF/TXT/DOC/HTML……）/批量转换为 PDF……
✏ 内容编辑：批量查找与替换跨多个文件/统一调整所有图片大小/调整翻转表格行列/表格转文本……
🧹 轻松清理：一键清除多余空格/分节符/文本框/超链接/ 想要更多清理工具，请前往移除分组……
➕ 创意插入：插入千位分隔符/复选框/选项按钮/二维码/条形码/多图插入/ 更多插入选项请查看插入分组……
🔍 精准选择：快速定位特定页面/表格/形状/标题段落/ 利用更多选择功能提升导航效率……
⭐ 明星增强功能：跳转到任意位置/自动插入重复文本/在多个文档 Windows 间切换/11 转换工具……
🌍 支持 40+ 种语言：无论您身处何地，Kutools 均支持英语、西班牙语、德语、法语、中文等 40 多种语言！
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 无缝集成 | ⚡ 保存时间，立即提升效率