Как выбрать все встроенные объекты Visio в Word?

Если ваш документ Word содержит несколько встроенных объектов Visio, выбор каждого из них по отдельности может быть утомительным. В этом руководстве представлено два метода, которые помогут вам быстро выбрать все встроенные объекты Visio в документе.

Выбор всех встроенных объектов Visio с помощью VBA

Выбор всех встроенных объектов Visio с помощью Kutools для Word

Выбор всех встроенных объектов Visio с помощью VBA

Вместо того чтобы вручную выбирать каждый встроенный объект Visio, вы можете использовать макрос VBA для быстрого их выбора. Вот как это сделать:

1. Нажмите Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений.
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. Нажмите кнопку Выполнить или нажмите F5 для выполнения кода.

Office Tab: Добавляет интерфейсы с вкладками в Word, Excel, PowerPoint...

Улучшите свой рабочий процесс прямо сейчас.Узнать больше об Office Tab Бесплатная загрузка

Выбор всех встроенных объектов Visio с помощью Kutools для Word

Если вы не уверены в использовании макросов или просто предпочитаете более простой способ, Kutools для Word предлагает решение в один клик. С помощью функции Выбрать абзацы с встроенными объектами Visio вы можете мгновенно выбрать все объекты Visio в вашем документе.

1. Нажмите Kutools > Абзацы (в группе Выбор) > Выбрать абзацы с встроенными объектами Visio.

   

Лучшие инструменты для повышения производительности в офисе

Kutools for Word — Поднимите свой опыт работы с Word на новый уровень, используя более 100 впечатляющих функций!

🤖 Возможности ИИ Kutools: AI Ассистент / Ассистент в Реальном Времени / Супер Полировка (Сохраняет форматирование) / Супер Перевод (Сохраняет форматирование) / Искусственный интеллект для редактирования / Проверка с помощью ИИ...

📘 Мастерство работы с Документом: Разделить страницы / Объединить документы / Экспортировать диапазон в различные форматы (PDF/TXT/DOC/HTML...) / Пакетное преобразование в PDF...

✏ Редактирование текста сообщения: Пакетный поиск и замена в нескольких файлах / Изменить размер всех изображений / Транспонировать строки и столбцы таблицы / Преобразовать таблицу в текст...

🧹 Легкая очистка: Удалить лишние пробелы / Разрывы разделов / Текстовые поля / Гиперссылки / Для получения дополнительных инструментов удаления перейдите в группу Удалить...

➕ Креативные вставки: Вставить тысячные разделители / Флажки / Переключатели / QR-код / Штрихкод / Несколько изображений / Узнайте больше в группе Вставить...

🔍 Точные выделения: Определить конкретные страницы / Таблицы / Фигуры / Абзацы заголовков / Улучшайте навигацию с помощью дополнительных функций выбора...

⭐ Особые улучшения: Перейти к любому диапазону / Автоматическая вставка повторяющегося текста / Переключение между окнами документа /11 инструментов преобразования...

🌍 Поддержка более40 языков: Используйте Kutools на предпочитаемом языке — поддерживаются Английский, Испанский, Немецкий, Французский, Китайский и еще более40 языков!

👉 Хотите попробовать эти функции? Загрузите Kutools for Word сейчас! 🚀

Бесплатная загрузка     Купить     Подробнее о Kutools for Word

 

✨ 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

• 🤖 Возможности ИИ Kutools: AI Ассистент / Ассистент в Реальном Времени / Супер Полировка / Супер Перевод / Искусственный интеллект для редактирования / Проверка с помощью ИИ
• 📘 Мастерство работы с Документом: Разделить страницы / Объединить документы / Пакетное преобразование в PDF
• ✏ Редактирование текста сообщения: Пакетный поиск и замена / Изменить размер всех изображений
• 🧹 Легкая очистка: Удалить лишние пробелы / Удалить разрывы разделов
• ➕ Креативные вставки: Вставить тысячные разделители / Вставить флажки / Создать QR-коды
• 🌍 Поддержка более40 языков: Kutools говорит на вашем языке — поддерживаются более40 языков!

Бесплатная загрузка Купить Подробнее о Kutools