Как экспортировать все изображения из Excel сразу?
Предположим, в вашей книге содержится множество изображений, и вы хотите сохранить их все в определённую папку одновременно. Обычно для этого приходится копировать и вставлять изображения по одному вручную, что занимает много времени. Ниже приведены несколько советов, которые помогут вам решить эту задачу.
Экспорт всех изображений сразу из Excel с помощью функции «Сохранить как»
С помощью встроенной в Excel функции «Сохранить как» можно сохранить книгу в формате Веб-страница, чтобы все изображения — включая диаграммы, фигуры и другие объекты — сохранились в отдельной папке. Выполните следующие действия.
1. Откройте книгу с изображениями, которые необходимо сохранить. Нажмите Файл > Сохранить как > Обзор.
2. В диалоговом окне «Сохранить как» выполните следующие действия:
3. Во всплывающем диалоговом окне Microsoft Excel нажмите кнопку Да.
4. Откройте папку с экспортированными файлами — внутри вы найдёте одну папку и один HTML-файл со списком файлов. Все изображения из книги, включая диаграммы, фигуры и другие объекты, сохранены именно в этой папке.
5. Оставьте в папке только нужные изображения, удалив остальные.
Простой экспорт всех изображений сразу из Excel с помощью удивительного инструмента
Описанный выше метод извлекает из книги все объекты, включая те, которые могут быть вам не нужны. Если в Excel установлено расширение Kutools для Excel, его функция Экспорт диаграммы поможет сохранить только необходимые изображения.
1. Нажмите KUTOOLS PLUS > Импорт/экспорт > Экспорт диаграммы:
2. В диалоговом окне Экспорт диаграммы настройте параметры следующим образом:
, чтобы указать путь Выберите папку для сохранения экспортированных изображений;
3. Затем появится диалоговое окно с информацией о количестве успешно экспортированных изображений. Нажмите кнопку OK.
Теперь вы можете перейти в целевую папку и проверить файлы Экспорт изображений.
Чтобы узнать больше об этой функции, нажмите Экспорт диаграммы.
Перед применением Kutools для Excel пожалуйста, сначала загрузите и установите его.
Экспорт изображений и переименовать их согласно значениям соседних ячеек
Как показано на скриншоте ниже, имеются два столбца: один содержит список названий фруктов, а другой — соответствующие изображения этих фруктов. Чтобы экспортировать изображения и автоматически присвоить им имена в соответствии с названиями фруктов, воспользуйтесь приведённым в этом разделе кодом VBA.
1. На листе, с которым вы работаете, нажмите клавиши Alt+F11, чтобы открыть окно Microsoft Visual Basic для приложений.
2. В окне Microsoft Visual Basic для приложений выберите Вставка > Модуль. Затем скопируйте приведённый ниже код VBA в окно модуля.
Код VBA: экспорт изображений из столбца с автоматическим присвоением им имён
Sub ExportImages_ExtendOffice()
'Updated by Extendoffice 20220308
Dim xStrPath As String
Dim xStrImgName As String
Dim xImg As Shape
Dim xObjChar As ChartObject
Dim xFD As FileDialog
Set xFD = Application.FileDialog(msoFileDialogFolderPicker)
xFD.Title = "Please select a folder to save the pictures" & " - ExtendOffice"
If xFD.Show = -1 Then
xStrPath = xFD.SelectedItems.Item(1) & "\"
Else
Exit Sub
End If
On Error Resume Next
For Each xImg In ActiveSheet.Shapes
If xImg.TopLeftCell.Column = 2 Then
xStrImgName = xImg.TopLeftCell.Offset(0, -1).Value
If xStrImgName <> "" Then
xImg.Select
Selection.Copy
Set xObjChar = ActiveSheet.ChartObjects.Add(0, 0, xImg.Width, xImg.Height)
With xObjChar
.Border.LineStyle = xlLineStyleNone
.Activate
ActiveChart.Paste
.Chart.Export xStrPath & xStrImgName & ".png"
.Delete
End With
End If
End If
Next
End Sub
Примечания:
3. Нажмите клавишу F5, чтобы запустить код. В открывшемся окне выберите папку для сохранения изображений, затем нажмите OK.
Теперь все изображения из указанного столбца экспортированы и автоматически названы в соответствии со значениями соседних ячеек — именно так, как вы задали.
Связанная статья:
Как экспортировать диаграммы в графические файлы в 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-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек