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

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

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

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

Змінюйте розмір зображень за допомогою Kutools for 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 for Word

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

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

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

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

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

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

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


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

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

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

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

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

Зануртеся в виділені функції нижче або натисніть тут, щоб дослідити всю потужність Kutools for Word.

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

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

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

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

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

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

Перетворіть свої завдання Word за допомогою Kutools. 👉 Завантажте зараз із 30-денною пробною версією 🚀.

 
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
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations