Как быстро изменить размер нескольких ячеек, чтобы они соответствовали изображениям в Excel?
Как мы знаем, Microsoft Excel поддерживает автоматическое изменение размера строки и ширины столбца ячейки для соответствия заполненному содержимому, например длинной текстовой строке. Однако команды "Автоподбор высоты строки" и "Автоподбор ширины столбца" недействительны для изображения, поскольку вставленное изображение не находится в определенной ячейке.
Измените размер ячеек по размеру изображений с помощью VBA
Измените размер изображений, чтобы они соответствовали ячейкам с помощью Kutools for Excel 
- Повторное использование чего угодно: Добавляйте наиболее часто используемые или сложные формулы, диаграммы и все остальное в избранное и быстро используйте их в будущем.
- Более 20 текстовых функций: Извлечь число из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
- Инструменты слияния: Несколько книг и листов в одну; Объединить несколько ячеек / строк / столбцов без потери данных; Объедините повторяющиеся строки и сумму.
- Разделить инструменты: Разделение данных на несколько листов в зависимости от ценности; Из одной книги в несколько файлов Excel, PDF или CSV; От одного столбца к нескольким столбцам.
- Вставить пропуск Скрытые / отфильтрованные строки; Подсчет и сумма по цвету фона; Отправляйте персонализированные электронные письма нескольким получателям массово.
- Суперфильтр: Создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировать по неделям, дням, периодичности и др .; Фильтр жирным шрифтом, формулы, комментарий ...
- Более 300 мощных функций; Работает с Office 2007-2021 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.
Измените размер ячеек по размеру изображений с помощью VBA
Предположим, что на листе есть два больших изображения, см. Следующий снимок экрана. Кто-то может захотеть изменить размер ячейки, чтобы она соответствовала изображению над ячейкой. Но как это реализовать?
Конечно, вы можете автоматически изменять размер каждой ячейки, чтобы соответствовать изображениям над ними. Однако это может быть утомительным и трудоемким для ряда изображений. Фактически, мы можем применить макрос VB, чтобы изменить размер всех ячеек, чтобы они соответствовали изображениям над ними. Вы можете сделать это, выполнив следующие действия:
Шаг 1: Удерживайте ALT + F11 ключи, и он открывает Microsoft Visual Basic для приложений окно.
Шаг 2: нажмите Вставить > Модулии вставьте следующий макрос в окно модуля.
VBA: изменение размера нескольких ячеек в соответствии с их изображениями.
Sub ResizePictureCells()
For Each Picture In ActiveSheet.DrawingObjects
PictureTop = Picture.Top
PictureLeft = Picture.Left
PictureHeight = Picture.Height
PictureWidth = Picture.Width
For N = 2 To 256
If Columns(N).Left > PictureLeft Then
PictureColumn = N - 1
Exit For
End If
Next N
For N = 2 To 65536
If Rows(N).Top > PictureTop Then
PictureRow = N - 1
Exit For
End If
Next N
Rows(PictureRow).RowHeight = PictureHeight
Columns(PictureColumn).ColumnWidth = PictureWidth * (54.29 / 288)
Picture.Top = Cells(PictureRow, PictureColumn).Top
Picture.Left = Cells(PictureRow, PictureColumn).Left
Next Picture
End SubШаг 3: нажмите F5 ключ для запуска этого макроса.
Теперь на текущем листе, если есть изображения, размер ячейки под изображением будет изменен, чтобы соответствовать изображению над ним. См. Следующий снимок экрана:
Измените размер изображений, чтобы они соответствовали ячейкам с помощью Kutools for Excel
Если вы изменили размер ячеек, как показано на скриншоте ниже, а затем хотите импортировать и изменить размер изображений, чтобы они соответствовали размеру ячеек, как вы можете быстро это сделать? В этом случае, Kutools for Excel's Импорт изображений утилита может помочь вам легко справиться с этой работой.
| Kutools for Excel, с более чем 120 удобные функции, облегчают вашу работу. | ||
После установки Kutools for Excel, пожалуйста, сделайте, как показано ниже :(Скачать бесплатно Kutools for Excel сейчас!)
1. Нажмите Предприятие > Импорт/Экспорт > Импорт изображений. Смотрите скриншот:
2. Во всплывающем Импорт изображений диалоговом окне вы можете сначала указать порядок импорта в Заказ на импорт раздел, а затем щелкните Добавить кнопку, чтобы добавить изображения из папки или в виде файлов по одному, после чего вы увидите, что изображения перечислены в Картина раздел. Смотрите скриншот:
3. Затем нажмите Импортировать кнопка, чтобы показать Размер импортированного изображения диалоговое окно, затем проверьте Соответствующий размер ячейки вариант. Смотрите скриншот:
4. Нажмите OK > Импортировать для отображения диалогового окна выбора ячеек, в которые вы хотите импортировать изображения. Смотрите скриншот:
5. Нажмите OK, и теперь все объекты импортируются в ячейки и меняют свои размеры до соответствующих ячеек.
Импортировать изображения по размеру ячейки
Связанная статья:
Как вставить несколько изображений в ячейку в Excel?
Лучшие инструменты для работы в офисе
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%
- Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма ...
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
- Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы... Предотвращение дублирования ячеек; Сравнить диапазоны...
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
- Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии...
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом ...
- Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
- Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
