Перейти к содержимому

Kutools для Office — один пакет. Пять инструментов. Выполняйте больше.

Как увеличить или расширить изображение по клику в документе Word?

Author Siluvia Last modified

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

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

Увеличение или расширение изображения по клику с помощью кода VBA

Изменение размера всех изображений одновременно с помощью Kutools for Word

Увеличение или расширение изображения по клику с помощью кода VBA

Следующий код VBA поможет вам увеличивать изображения в документе Word по клику. Следуйте этим шагам:

  1. Откройте документ Word, содержащий изображения, и нажмите Alt + F11, чтобы открыть окно "Microsoft Visual Basic for Applications".
  2. В окне "Microsoft Visual Basic for Applications" нажмите "Вставить" > "Классовый модуль". Затем скопируйте следующий код в окно "Классовый модуль": 
    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

    3. Примечание: В коде число 200 указывает высоту и ширину увеличенных изображений в пунктах (pt). Вы можете настроить эти значения по своему усмотрению.

  3. Далее нажмите "Вставить" > "Модуль" и скопируйте следующий код в окно "Модуль": 
    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 for Applications".
  5. Теперь, когда вы кликните по изображению в документе, оно будет увеличено до указанного размера. Смотрите скриншот:
    Image enlarged after clicking

Изменение размера всех изображений одновременно с помощью Kutools for Word

Используя утилиту "Изменить размер изображений" в Kutools for Word, вы можете изменить размер всех изображений в вашем документе Word, указав процентное соотношение, соответствующее размеру выбранного изображения, или задав конкретные размеры или масштабы.

Kutools для Word,оснащённый ИИ 🤖, предлагает более 100 удобных функций для упрощения ваших задач.
  • Чтобы изменить размер всех изображений до определенного процента от их исходного размера:
    • Нажмите "Kutools Plus" > "Изменить размер", и выберите один из шести процентов из выпадающего списка. Например, выберите "50%", чтобы изменить размер всех изображений до половины их исходного размера.
      Illustration: Resize all pictures to 50% of their original size
  • Чтобы настроить все изображения в соответствии с размером выбранного изображения:
    1. Выберите изображение, которое будет служить моделью размера.
    2. Нажмите "Kutools Plus" > "Изменить размер" > "Изменить размер всех изображений на основе выделения". Все изображения будут изменены до того же размера, что и выбранное изображение.
      Illustration: Resize all pictures to the size of the selected picture
  • Если вам нужны более специфические параметры, нажмите "Kutools Plus" > "Изменить размер" > "Настроить", чтобы получить доступ к расширенным настройкам изменения размера.
    Illustration: Resize all pictures with advanced resizing settings

Для получения более подробной информации об утилите "Изменить размер изображений" в Kutools for Word, пожалуйста, нажмите здесь, чтобы прочитать полное руководство и увидеть пошаговые инструкции.

Kutools для Word — это идеальный надстройка для Word, которая упрощает вашу работу и повышает навыки обработки документов. Получите сейчас!
Office Tab: Добавляет интерфейсы с вкладками в Word, Excel, PowerPoint...
Navigate through documents using Office Tab
Улучшите свой рабочий процесс прямо сейчас.Узнать больше об Office Tab Бесплатная загрузка

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

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

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

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

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

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

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

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

⭐ Особые улучшения: Перейти к любому диапазону / Автоматическая вставка повторяющегося текста / Переключение между окнами документа /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

📦 Получите все5 инструментов в одном пакете | 🔗 Бесшовная интеграция с Microsoft Office | ⚡ Мгновенно экономьте время и повышайте продуктивность

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

Kutools for Word - 100+ инструментов для Word

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