Как повернуть изображение в Excel на основе значения ячейки?
В Excel изображение можно поворачивать, перетаскивая его мышью, — но пробовали ли вы когда-нибудь поворачивать изображение на основе значения ячейки? Например, если значение ячейки A1 равно 90, изображение автоматически повернётся на 90 градусов, как показано на снимке экрана ниже.
Поворот изображения на основе значения ячейки с помощью макрокода
Поворот изображения на основе значения ячейки с помощью макрокода
Только макрос поможет вам повернуть изображение в Excel на основе значения ячейки.
1. Введите в ячейку A1 значение угла поворота изображения в градусах, затем выделите изображение, которое нужно повернуть.
2. Нажмите Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений, и выберите Вставка > Модуль, чтобы вставить новый пустой модуль. См. снимок экрана:
3. Вставьте приведённый ниже код в модуль, затем нажмите F5, чтобы выполнить код. См. снимок экрана:
VBA: Поворот изображения по значению ячейки
Sub RotateImage()
Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value
End Sub
Примечание: в коде A1 — это ячейка, на основе значения которой будет повёрнуто изображение; при необходимости вы можете изменить её.
Связанные статьи:
- Как повернуть текст в колонтитуле при использовании альбомной ориентации в Excel?
- Как повернуть таблицу на 90 или 180 градусов в Excel?
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек