Перейти до основного матеріалу

Як перетворити всі зв’язані зображення на вбудовані в документ Word?

Коли ви надсилаєте документ Word, що містить пов’язані зображення, іншим, зображення будуть відсутні і відображатимуться на комп’ютері одержувача, як показано на знімку екрана нижче. Як перетворити всі зв’язані зображення на вбудовані відразу перед надсиланням іншим? У цій статті наведено метод VBA для боротьби з ним.

Перетворити пов’язані зображення на вбудовані за допомогою коду VBA


Перетворити пов’язані зображення на вбудовані за допомогою коду VBA

Будь ласка, застосуйте наведений нижче код VBA, щоб перетворити всі зв’язані зображення в документі на вбудовані.

1. Відкрийте документ Word, що містить пов'язані зображення, які ви перетворите у вбудовані зображення. Натисніть кнопку інший + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2 В Microsoft Visual Basic для додатків вікна, натисніть Insert > Модуль. А потім скопіюйте нижче код VBA в Модулі вікно. Дивіться знімок екрана:

Код VBA: перетворити всі зв’язані зображення на вбудовані одночасно

Sub convert_all_inline_shapes()
'Updated by Extendoffice 20180906
    Dim xIShape As InlineShape
    For Each xIShape In ActiveDocument.InlineShapes
        With xIShape
            If .Type = wdInlineShapeLinkedPicture Then
                .LinkFormat.SavePictureWithDocument = True
                .LinkFormat.BreakLink
            End If
        End With
    Next
End Sub

3 Натисніть кнопку F5 клавіша для запуску коду.

Потім усі зв’язані зображення в поточному документі одночасно перетворюються на вбудовані.

Найкращі інструменти продуктивності офісу

Kutools для Word - Підніміть свій досвід Word із Over 100 Чудові особливості!

🤖 Kutools AI Assistant: змініть свій текст за допомогою ШІ - Створення вмісту  /  Переписати текст  /  Узагальнити документи  /  Звертайтеся за інформацією на основі Документа, все в Word

📘 Майстерність документів: Розділити сторінки  /  Об’єднати документи  /  Експортувати вибране в різні формати (PDF/TXT/DOC/HTML...)  /  Пакетне перетворення в PDF  /  Експортувати сторінки як зображення  /  Друк кількох файлів одночасно...

Редагування змісту: Пакетний пошук та заміна між кількома файлами  /  Змінити розмір усіх зображень  /  Транспонування рядків і стовпців таблиці  /  Перетворити таблицю в текст...

🧹 Очищення без зусиль: Змітати Зайві простори  /  Розбиття розділів  /  Усі заголовки  /  Текстові поля  /  Гіперпосилання  / Щоб отримати більше інструментів для видалення, відвідайте наш сайт Вилучити групу...

Творчі вставки: Вставити Роздільники тисяч  /  Прапорці  /  радіо кнопки  /  QR-код  /  Штрих-код  /  Таблиця діагональних ліній  /  Заголовок рівняння  /  Підпис зображення  /  Заголовок таблиці  /  Кілька зображень  / Дізнайтеся більше в Вставити групу...

???? Точність вибору: Точне визначення конкретні сторінки  /  Таблиці  /  форми  /  заголовок абзаців  / Покращте навігацію за допомогою більше Виберіть функції...

Покращення зірок: Швидка навігація до будь-якого місця  /  автоматичне вставлення повторюваного тексту  /  плавно перемикатися між вікнами документів  /  11 Інструменти перетворення...

👉 Хочете спробувати ці функції? Kutools для Word пропонує a 60-денна безкоштовна пробна версія, без обмежень! ????
 
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thanks, exactly what I was looking for.Chris.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations