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

Як натиснути, щоб збільшити або розгорнути зображення в документі Word?

Автор: Силувій Остання зміна: 2020-07-08

У цій статті йдеться про те, як збільшити або розширити зображення в документі Word клацанням миші.

Клацніть, щоб збільшити або розгорнути зображення за допомогою коду VBA

Змінюйте розмір зображень за допомогою Kutools для Word


Клацніть, щоб збільшити або розгорнути зображення за допомогою коду VBA

Наступний код VBA може допомогти збільшити зображення в документі Word одним клацанням миші. Будь ласка, виконайте наступне.

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

2 В Microsoft Visual Basic для додатків вікна, натисніть Insert > Модуль класу. Потім скопіюйте код VBA у вікно класу.

Код VBA 1: Клацніть, щоб збільшити зображення

Public WithEvents GApp As Word.Application
'Updated by ExtendOffice 20181129
Private Sub GApp_WindowSelectionChange(ByVal Sel As Selection)
    Dim xShape As InlineShape
    On Error Resume Next
    Set xShape = Sel.InlineShapes(1)
    xShape.Height = 200
    xShape.Width = 200
End Sub

примітки: У коді число 200 - це вказана висота та ширина збільшених зображень. Ви можете змінювати висоту та ширину, як вам потрібно.

3. клацання Insert > Модулі, скопіюйте код нижче у вікно модуля.

Код VBA 2: Клацніть, щоб збільшити зображення

Dim cls As New Class1
'Updated by ExtendOffice 20181129
Sub register_Event_Handler()
    Set cls.GApp = Word.Application
End Sub

4 Натисніть кнопку F5 , щоб запустити код і закрити Microsoft Visual Basic для додатків вікна.

Тепер, при натисканні зображення у цьому файлі, зображення буде збільшено до потрібного розміру.


Змінюйте розмір зображень за допомогою Kutools для Word

Команда Змінити розмір зображень корисність Kutools для Word може допомогти вам змінити розмір усіх зображень на вказаний відсоток або вибране зображення. Будь ласка, спробуйте.

Kutools для Word : Маючи понад 100 зручних надбудов Word, безкоштовно спробувати без обмежень протягом 60 днів.

Натисніть Kutools Plus > Зміна розміру, виберіть відсоток зі спадного списку. Дивіться знімок екрана:

Потім розмір усіх зображень у поточному документі змінюється залежно від цього конкретного відсотка.

Щоб змінити розмір усіх зображень залежно від розміру вибраного зображення, потрібно спочатку вибрати зображення, а потім клацнути Kutools Plus > Зміна розміру > Змініть розмір зображень із виділенням. Дивіться знімок екрана:

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

Якщо ви хочете отримати безкоштовну пробну версію цієї утиліти, перейдіть на безкоштовно завантажити програмне забезпечення - спочатку, а потім перейдіть до застосування операції, як описано вище.


Вкладка Office - Перегляд, редагування та керування декількома документами в Word із вкладками:

Вкладка Office переносить інтерфейс із вкладками, як у таких веб-переглядачах, як Google Chrome, нові версії Internet Explorer і Firefox, у Microsoft Word. Це волі бути інструментом, що економить час і незамінним у вашій роботі. Дивіться демонстрацію нижче:

Натисніть, щоб отримати безкоштовну пробну версію Office Tab!

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

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

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

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

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

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

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

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

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

👉 Хочете спробувати ці функції? Завантажте Kutools для Word зараз! ????
 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Yeah nice try, but it should really put the enlarged image in a temporary popup, instead of literally resizing the image!
This comment was minimized by the moderator on the site
OK...after clicking to expand, how do you get it to restore back to default size or click to default size?
This comment was minimized by the moderator on the site
It work in older world file, saved as .doc, but opened in MS 365.
This comment was minimized by the moderator on the site
Hi

The macro doesn't work as should. On MS Office 365 the resizing appear only for few mili sec.
This comment was minimized by the moderator on the site
Hi Thanks for the tip. I'm following the instructions on how to enlarge by using Macro, however I'm getting a error message "The type that was defined by user was ot defined" Any idea?
There are no comments posted here yet
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations