Como exportar todas as imagens de uma vez do Excel?
Supondo que você tenha muitas imagens em sua pasta de trabalho e queira salvá-las em uma pasta específica de cada vez, geralmente você pode copiar e colar as imagens uma a uma manualmente para salvar, mas é demorado copiá-las e colá-las repetidamente assim. Aqui, vou apresentar algumas dicas para resolver este trabalho.
Exporte todas as imagens de uma vez do Excel com a função Salvar como
Com o Excel integrado Salvar como função, você pode salvar uma pasta de trabalho como web Página para salvar todas as imagens, incluindo gráficos, formas e outros objetos em uma pasta. Por favor, faça o seguinte.
1. Abra a pasta de trabalho com as imagens que deseja salvar. Clique Envie o > Salvar como > Squeaky toy.
2. No Salvar como caixa de diálogo, você precisa:
3. No popping up Microsoft Excel caixa de diálogo, clique no botão Sim botão.
4. Abra a pasta onde os arquivos exportados são salvos e você pode ver uma pasta e um arquivo de formato HTML listado dentro. Todas as imagens da pasta de trabalho, incluindo gráficos, formas ou objetos, são salvas nesta pasta.
5. Você pode manter as fotos que você precisa na pasta e excluir outras que você não precisa
Exporte facilmente todas as imagens de uma só vez do Excel com uma ferramenta incrível
O método acima extrairá todos os objetos da pasta de trabalho, talvez alguns deles você não precise. Se você tem Kutools for Excel instalado no Excel, é Exportar Gráficos recurso pode ajudá-lo a salvar apenas as fotos que você precisa.
Depois de instalar Kutools for Excel, faça o seguinte:
1. Clique Kutools Plus > Importar e Exportar > Exportar Gráficos:
2. No Exportar Gráficos caixa de diálogo, configure da seguinte maneira:
3. Em seguida, uma caixa de diálogo aparece para informar quantas fotos foram exportadas com sucesso, clique no botão OK botão.
Agora você pode ir para a pasta de destino e verificar as imagens exportadas.
Por favor, clique Exportar Gráficos para saber mais sobre este recurso.
Antes de aplicar Kutools for Excel, Por favor baixe e instale primeiro.
Exporte imagens e renomeie-as com os valores das células adjacentes
Conforme mostrado na captura de tela abaixo, existem duas colunas, uma contém uma lista de nomes de frutas e a outra contém as imagens correspondentes das frutas. Para exportar essas imagens e nomeá-las automaticamente com os nomes de frutas correspondentes, você pode tentar o código VBA nesta seção.
1. Na planilha para onde deseja exportar as imagens, pressione o botão outro + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.
2. No Microsoft Visual Basic para Aplicações janela, clique em inserção > Módulo. E, em seguida, copie o seguinte VBA na janela do módulo.
Código VBA: Exporte imagens em uma coluna e nomeie-as automaticamente
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
Observações:
3. aperte o F5 chave para executar o código. Na janela de abertura, selecione uma pasta para salvar as imagens e clique em OK.
Em seguida, todas as imagens em uma coluna especificada são exportadas e nomeadas automaticamente com os valores das células adjacentes conforme você especificou.
Artigo relacionado:
Como exportar gráficos para gráficos no Excel?
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!