¿Cómo exportar todas las imágenes a la vez desde Excel?
Supongamos que tiene muchas imágenes en su libro de trabajo y desea guardarlas en una carpeta específica a la vez, por lo general, puede copiar y pegar las imágenes una por una manualmente para guardarlas, pero lleva mucho tiempo copiarlas y pegarlas. repetidamente así. Aquí, te presentaré algunos consejos para resolver este trabajo.
Exporta todas las imágenes a la vez desde Excel con la función Guardar como
Con el Excel incorporado Guardar como función, puede guardar un libro de trabajo como Página web para guardar todas las imágenes, incluidos gráficos, formas y otros objetos en una carpeta. Por favor, haga lo siguiente.
1. Abra el libro de trabajo con las imágenes que desea guardar. Hacer clic Archive > Guardar como > Navegar
2. En el Guardar como cuadro de diálogo, debe:
3. En la aparición Microsoft Excel cuadro de diálogo, haga clic en Sí del botón.
4. Abra la carpeta donde se guardan los archivos exportados y podrá ver una carpeta y un archivo en formato HTML enumerados dentro. Todas las imágenes del libro de trabajo, incluidos gráficos, formas u objetos, se guardan en esta carpeta.
5. Puede guardar las imágenes que necesita en la carpeta y eliminar otras que no necesita
Exporte fácilmente todas las imágenes a la vez desde Excel con una herramienta increíble
El método anterior extraerá todos los objetos del libro de trabajo, tal vez, algunos de ellos no los necesite. Si usted tiene Kutools for Excel instalado en Excel, su Exportar gráficos función puede ayudarlo a guardar solo las imágenes que necesita.
Después de instalar Kutools for Excel, haga lo siguiente:
1. Hacer clic en Kutools Más > Importación y exportación > Exportar gráficos:
2. En el Exportar gráficos cuadro de diálogo, configure de la siguiente manera:
botón para seleccionar una carpeta para guardar sus imágenes exportadas;
3. Luego aparece un cuadro de diálogo que le indica cuántas imágenes se han exportado con éxito, haga clic en el botón OK del botón.
Ahora puede ir a la carpeta de destino y verificar las imágenes exportadas.
Haz clic Exportar gráficos para saber más sobre esta función.
Antes de aplicar Kutools for Excel, Por favor descargarlo e instalarlo en primer lugar.
Exportar imágenes y cambiarles el nombre con los valores de las celdas adyacentes
Como se muestra en la captura de pantalla a continuación, hay dos columnas, una contiene una lista de nombres de frutas y la otra contiene las imágenes correspondientes de las frutas. Para exportar estas imágenes y nombrarlas automáticamente con los nombres de frutas correspondientes, puede probar el código VBA en esta sección.
1. En la hoja de trabajo donde desea exportar las imágenes, presione el botón otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. En el Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > Módulo. Y luego copie el siguiente VBA en la ventana del Módulo.
Código VBA: exporte imágenes en una columna y asígneles un nombre automáticamente
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
Notas:
3. presione el F5 clave para ejecutar el código. En la ventana que se abre, seleccione una carpeta para guardar las imágenes y luego haga clic en DE ACUERDO.
Luego, todas las imágenes en una columna específica se exportan y se nombran automáticamente con los valores de celda adyacentes como especificó.
Artículo relacionado:
¿Cómo exportar gráficos a gráficos en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
