Skip to main content

Kutools for Office — 一套工具,五種功能。完成更多工作。

如何在 Word 中選取所有嵌入的 Visio 對象?

Author Amanda Li Last modified

如果您的 Word 文檔包含多個嵌入的 Visio 對象,逐一手動選取可能會非常繁瑣。本教程介紹了兩種方法,幫助您快速選取文檔中的所有嵌入 Visio 對象。

使用 VBA 選取所有嵌入的 Visio 對象

使用 Kutools for Word 選取所有嵌入的 Visio 對象

推薦的 Word 生產力工具

Kutools for Word:整合 AI 🤖,超過 100 項進階功能,可節省 50% 的文檔處理時間。免費下載

Office Tab:將類似瀏覽器的標籤引入 Word(及其他 Office 工具),簡化多文檔導航。免費下載


使用 VBA 選取所有嵌入的 Visio 對象

您可以使用 VBA 宏來快速選取所有嵌入的 Visio 對象,而不是手動逐一選取。以下是具體操作步驟:

  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, "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
  3. 點擊 執行 Run 按鈕或按下 F5 以執行該代碼。
Office Tab:為 Word、Excel、PowerPoint... 帶來分頁介面
Navigate through documents using Office Tab

使用 Kutools for Word 選取所有嵌入的 Visio 對象

如果您不熟悉使用宏,或者更喜歡簡單的方法,Kutools for Word 提供了一鍵解決方案。通過其「選取嵌入 Visio 對象的段落」功能,您可以立即選取文檔中的所有 Visio 對象。

Kutools for Word內建 AI 🤖,提供超過 100 種實用功能,助您簡化工作任務。
  1. 點擊 Kutools > 段落(在「選取」組中)> 選取嵌入 Visio 對象的段落。
    Select Paragraphs with Embedded Visio Objects option on the Kutools tab on the ribbon

注意:如果您在使用此工具之前選取了文檔的一部分,則該工具只會選取所選範圍內的嵌入 Visio 對象。

Kutools for Word 是終極的 Word 增益工具,能夠簡化您的工作並提升文檔處理技能。立即獲取!

最佳辦公效率工具

Kutools for Word -透過超過 100 項卓越功能,提升您的 Word 使用體驗!

🤖 Kutools AI FeaturesAI AssistantReal-Time AssistantSuper Polish(保留格式)Super Translate(保留格式)AI RedactionAI Proofread...

📘 文件掌握分割頁面文檔合併區域導出成各種格式(PDF/TXT/DOC/HTML...)批量轉換為 PDF...

正文編輯批量查找與替換多個文件批量調整所有圖片大小翻轉表格的行與列表格轉文本...

🧹 輕鬆清理:快速清除多餘空格分節符文字框超連結/更多清除工具請前往刪除工具組...

創意插入:插入千位分隔符複選框選項按鈕二維碼條形碼批量插入圖片/還有更多精彩功能在插入工具組...

🔍 精確選擇:精確定位特定頁面表格形狀標題段落/使用更多 選擇 功能提升導航效率...

亮點增強導航至任何區域自動插入重複文字切換文檔窗口11 轉換工具...

🌍 支援40+種語言:可用 Kutools於您偏好語言環境——支援英語、西班牙語、德語、法語、中文以及超過40種語言!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 想立即體驗這些功能嗎?立即下載 Kutools for Word!🚀
 

✨ Kutools for Office——一次安裝,五大強力工具!

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

📦 五大工具一次全擁有 | 🔗 與 Microsoft Office 無縫整合 | ⚡ 即刻省時提高工作效率

最佳辦公效率工具

Kutools for Word - 100+ 款 Word 工具