Skip to main content

Imagens no Excel: insira, redimensione, salve e exclua várias imagens ou fotos no Excel

Author: Xiaoyang Last Modified: 2025-08-06

Seja para inserir imagens do computador, da web ou do OneDrive, ou fixá-las em células específicas, este guia oferece soluções completas. Você também aprenderá a exibir imagens dinamicamente com base em valores de células, redimensionar e alinhar várias fotos, inserir imagens em comentários ou cabeçalhos e criar listas suspensas dinâmicas de imagens. Para tarefas avançadas, como exportar, renomear, manter flutuante ou excluir imagens de intervalos ou planilhas específicas, siga os tutoriais passo a passo para cada processo.

Índice:

1. Inserir imagens ou fotos na planilha a partir do computador, da web ou do OneDrive

2. Fixar imagens ou fotos em uma célula do Excel

3. Inserir várias imagens ou fotos no Excel

4. Inserir várias imagens ou fotos correspondendo aos nomes nas células

5. Inserir ou exibir imagens ou fotos a partir de URLs

6. Inserir ou exibir imagens ou fotos a partir de caminhos de arquivos

7. Inserir imagem ou foto em um comentário

8. Inserir imagem ou foto no cabeçalho ou rodapé

9. Inserir a mesma imagem ou foto em várias planilhas

10. Inserir imagem ou foto atrás do conteúdo das células

11. Inserir um intervalo de células como formato de imagem ou foto no Excel

12. Inserir imagem ou foto dinamicamente com base no valor da célula

13. Exportar ou salvar todas as imagens ou fotos de um arquivo Excel

14. Renomear nomes de imagens em uma pasta com base em uma lista de células no Excel

15. Ampliar ou reduzir a imagem ao clicar nela

16. Manter uma imagem sempre visível ao rolar a planilha

17. Excluir imagens ou fotos da planilha ativa / de um intervalo de células


Inserir imagens ou fotos na planilha a partir do computador, da web ou do OneDrive

Todas as versões do Excel permitem inserir imagens ou fotos do computador, mas, se você quiser inserir imagens da web ou do OneDrive, é necessário ter o Excel2013 ou superior.

Inserir imagens ou fotos do computador

Para a maioria das pessoas, inserir imagens armazenadas no computador em uma planilha é simples. Veja como fazer:

1. Na planilha, clique onde deseja inserir as imagens.

2. Em seguida, clique em Inserir > Imagens > Este Dispositivo, veja a imagem:

A screenshot of the Insert Pictures option in Excel for adding images from a device

3. Na janela Inserir Imagem que será exibida, abra a pasta que contém as imagens e mantenha pressionada a tecla Ctrl para selecionar as imagens que deseja inserir, veja a imagem:

A screenshot of selecting images in the Insert Picture dialog box in Excel

4. Depois, clique no botão Inserir, as imagens selecionadas serão inseridas na planilha. Agora, você pode ajustar ou redimensionar as imagens para as células desejadas, veja a imagem:

A screenshot of pictures inserted into an Excel worksheet


Inserir imagens ou fotos da web ou do OneDrive

Se você possui o Excel2013 ou versões mais recentes, pode inserir imagens da web ou do OneDrive. Siga estes passos:

1. Na planilha, clique onde deseja inserir as imagens.

2. Em seguida, clique em Inserir > Imagens > Imagens Online, veja a imagem:

A screenshot of the Online Pictures option in Excel under the Insert tab

3. Uma janela será exibida. Na seção Imagens Online, digite o que está procurando na caixa de texto e pressione Enter. Todas as imagens correspondentes serão exibidas imediatamente, veja a imagem:

A screenshot of the Online Pictures search results in Excel

4. Em seguida, selecione as imagens desejadas e clique no botão Inserir. Após inserir as imagens, ajuste ou redimensione-as para a posição desejada.

Dicas:

1. Para pesquisar imagens específicas, você pode filtrar as imagens encontradas por tamanho, tipo, layout ou cor conforme necessário.

A screenshot showing filters for image search results in Excel's Online Pictures feature

2. Além de inserir imagens da pesquisa do Bing, você também pode inserir fotos armazenadas no seu OneDrive. Na janela abaixo, clique em OneDrive no canto inferior esquerdo da janela e selecione as imagens que deseja inserir.

A screenshot showing the OneDrive option for inserting images into Excel


Fixar imagens ou fotos em uma célula do Excel

Normalmente, após inserir imagens nas células, ao redimensionar, filtrar ou ocultar as células que contêm a imagem, a imagem não será redimensionada ou filtrada junto com a célula, conforme mostrado na demonstração abaixo.

A demonstration of images not resizing or filtering with cells in Excel

Nesse caso, você deve fixar a imagem na célula para que ela seja redimensionada, filtrada ou oculta junto com a célula. Siga os passos abaixo:

1. Clique para selecionar uma imagem e pressione Ctrl + A para selecionar todas as imagens da planilha.

2. Em seguida, clique com o botão direito em uma imagem e selecione Tamanho e Propriedades no menu de contexto, veja a imagem:

A screenshot showing the Size and Properties option for images in Excel

3. No painel expandido Formatar Imagem, na seção Propriedades, selecione a opção Mover e dimensionar com células, veja a imagem:

A screenshot of the Format Picture pane with the Move and size with cells option selected

4. Depois, feche o painel Formatar Imagem. Agora, ao redimensionar, filtrar ou ocultar as células, as imagens também serão movidas, filtradas ou ocultas.


Inserir várias imagens ou fotos no Excel

Às vezes, pode ser necessário inserir várias imagens nas células e redimensioná-las automaticamente para ajustar ao tamanho das células, sem precisar redimensionar e arrastar manualmente. Aqui, apresento duas formas de realizar essa tarefa no Excel.

Inserir várias imagens ou fotos e redimensioná-las para ajustar às células com código VBA

O código VBA a seguir pode ajudar a inserir várias imagens nas células de acordo com o tamanho das células. Veja como fazer:

1. Ajuste o tamanho das células onde deseja colocar as imagens e selecione as células.

2. Em seguida, pressione ALT + F11 para abrir o Microsoft Visual Basic for Applications.

3. Clique em Inserir > Módulo e cole o macro a seguir na janela do Módulo.

Código VBA: Inserir várias imagens com base no tamanho da célula

Sub InsertPictures()
'Updateby Extendoffice
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. Em seguida, pressione F5 para executar o código. Na janela Abrir, escolha a pasta que contém as imagens, selecione as imagens que deseja inserir e clique em Abrir. Todas as imagens selecionadas serão inseridas na seleção de acordo com o tamanho das células. Veja a imagem:

A screenshot of multiple images inserted into cells based on cell size in Excel


Inserir várias imagens ou fotos e redimensioná-las para ajustar às células com um recurso avançado

Se você não tem experiência com código VBA, pode usar um recurso avançado – Importar Imagens do Kutools para Excel. Com esse recurso, é possível importar várias imagens para as células de forma rápida e fácil.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

1. Clique em Kutools Plus > Importar & Exportar > Importar Imagens, veja a imagem:

A screenshot of the Import Pictures option in Kutools tab in Excel

2. Na janela Importar Imagens que será exibida, realize as seguintes operações:

  • Especifique a ordem das imagens na lista suspensa Ordem de Importação, podendo escolher Preencher por Coluna, depois por Linha ou Preencher por Linha, depois por Coluna;
  • Depois, clique no botão Adicionar para selecionar os arquivos de imagem ou a pasta e adicionar as imagens à Lista de Imagens;
  • Clique no botão Tamanho de Importação, na caixa de diálogo Tamanho da Imagem Importada, selecione a opção Tamanho da Célula Correspondente.
  • A screenshot of the Import Picture Size dialog box

3. Após concluir as configurações, clique em Importar, e outra janela Importar Imagens será exibida. Especifique as células de destino para importar as imagens, veja a imagem:

A screenshot showing the destination cells dialog during the Import Pictures process

4. Depois, clique em OK, todas as imagens selecionadas serão inseridas ajustando-se ao tamanho das células específicas, conforme mostrado na imagem abaixo:

A screenshot of multiple images inserted and resized to match Excel cell sizes using Kutools


Inserir várias imagens ou fotos correspondendo aos nomes nas células

Se você possui uma lista de nomes de produtos em uma coluna e precisa inserir as imagens correspondentes em outra coluna, conforme mostrado na imagem abaixo, inserir e arrastar as imagens uma a uma é muito trabalhoso. Nesta seção, apresento métodos rápidos para isso.

A screenshot of an Excel table with product names and corresponding images

Inserir várias imagens ou fotos correspondendo aos nomes com código VBA

O código VBA a seguir pode ajudar a inserir rapidamente várias imagens correspondentes aos nomes. Veja como fazer:

1. Pressione ALT + F11 para abrir o Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o macro a seguir na janela do Módulo.

Código VBA: Inserir várias imagens correspondendo aos nomes

Sub InserPictureByName()
'Updateby Extendoffice
Dim xFDObject As FileDialog
Dim xStrPath, xStrPicPath As String
Dim xRgName, xRgInser, xRg, xRgI As Range
Dim xFNum As Integer
Set xFDObject = Application.FileDialog(msoFileDialogFolderPicker)
With xFDObject
    .Title = "Please select the folder:"
    .InitialFileName = Application.ActiveWorkbook.Path
    .Show
    .AllowMultiSelect = False
End With
On Error Resume Next
xStrPath = ""
xStrPath = xFDObject.SelectedItems.Item(1)
If xStrPath = "" Then
Exit Sub
End If
Set xRgName = Application.InputBox("Please select the cells contain the image name:", "Kutools for Excel", , , , , , 8)
If xRgName Is Nothing Then
    MsgBox "No cells are select, exit operation! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
Set xRgInser = Application.InputBox("Please select the cells to output the images", "Kutools for Excel", , , , , , 8)
If xRgInser Is Nothing Then
    MsgBox " No cells are select, exit operation.! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
For xFNum = 1 To xRgName.Count
    Set xRg = xRgName.Item(xFNum)
    Set xRgI = xRgInser.Item(xFNum)
    xStrPicPath = xStrPath & "\" & xRg.Text & ".png"
    If Not Dir(xStrPicPath, vbDirectory) = vbNullString Then
        With xRgI.Parent.Pictures.Insert(xStrPicPath)
            .Left = xRgI.Left
            .Top = xRgI.Top
            .ShapeRange.LockAspectRatio = msoFalse
            .ShapeRange.Height = 60
            .ShapeRange.Width = 60
        End With
    End If
Next
End Sub

Observação: No código acima, você pode alterar a altura e largura da imagem nos scripts “.ShapeRange.Height =60”, “.ShapeRange.Width =60” conforme necessário.

3. Em seguida, pressione F5 para executar o código e, na janela aberta, selecione a pasta que contém as imagens que deseja inserir, veja a imagem:

A screenshot of the folder selection dialog box for inserting pictures

4. Depois, clique em OK, uma caixa de prompt será exibida. Selecione as células que contêm os nomes das imagens, veja a imagem:

A screenshot of the prompt to select cells containing image names for VBA code

5. Continue clicando em OK, e outra caixa de prompt será exibida. Selecione as células onde deseja inserir as imagens, veja a imagem:

A screenshot of the prompt to select output cells for images

6. Por fim, clique em OK, e as imagens serão inseridas nas células de acordo com seus nomes imediatamente, veja a imagem:

A screenshot showing images inserted into Excel cells based on their names using VBA


Inserir várias imagens ou fotos correspondendo aos nomes com um recurso útil

Se você possui o Kutools para Excel, com o recurso Correspondência de Importação de Imagens, pode inserir rapidamente as imagens com base nos nomes das imagens.

Kutools para Excel - Repleto de mais de 300 ferramentas essenciais para o Excel. Aproveite recursos de IA gratuitos permanentemente! Faça o download agora!

1. Clique em Kutools Plus > Importar & Exportar > Correspondência de Importação de Imagens, veja a imagem:

A screenshot of the Match Import Pictures option in Kutools Plus tab in Excel

2. Na caixa de diálogo Correspondência de Importação de Imagem, realize as seguintes operações:

  • Especifique a ordem das imagens na lista suspensa Ordem de Importação, podendo escolher Preencher por Coluna, depois por Linha ou Preencher por Linha, depois por Coluna;
  • Depois, na caixa de texto Intervalo de Correspondência, selecione os nomes das imagens para inserir as imagens com base nesses nomes;
  • Em seguida, clique no botão Adicionar para selecionar os arquivos de imagem ou a pasta e adicionar as imagens à Lista de Imagens;
  • Depois, especifique o tamanho das imagens. Clique no botão Tamanho de Importação, na caixa de diálogo Tamanho da Imagem Importada, selecione o tamanho desejado.
  • A screenshot of the Import Picture Size dialog box

3. Após concluir as configurações, clique em Importar, escolha uma célula ou uma lista de células para posicionar as imagens na caixa de diálogo Correspondência de Importação de Imagens, veja a imagem:

A screenshot of the Match Import Pictures dialog for locating images in Excel

4. Depois, clique em OK, e todas as imagens cujos nomes correspondem aos valores das células serão inseridas, veja a imagem:

A screenshot showing images inserted into Excel cells matching names using Kutools


Inserir ou exibir imagens ou fotos a partir de URLs

Você já tentou exibir ou inserir imagens a partir de uma lista de URLs? Talvez não haja um método direto para inserir imagens no Excel, mas é possível usar um código ou uma ferramenta de terceiros para isso.

Inserir ou exibir imagens ou fotos a partir de URLs com código VBA

Aplique o código VBA a seguir para inserir imagens com base em uma lista de URLs.

1. Primeiro, ajuste o tamanho da célula adjacente onde deseja posicionar as imagens.

2. Pressione ALT + F11 para abrir o Microsoft Visual Basic for Applications.

3. Clique em Inserir > Módulo e cole o macro a seguir na janela do Módulo.

Código VBA: Inserir imagens a partir de uma lista de URLs

Sub URLPictureInsert()
'Updateby Extendoffice
Dim Pshp As Shape
Dim xRg As Range
Dim xCol As Long
On Error Resume Next
Application.ScreenUpdating = False
Set Rng = ActiveSheet.Range("A2:A5")
For Each cell In Rng
filenam = cell
ActiveSheet.Pictures.Insert(filenam).Select
Set Pshp = Selection.ShapeRange.Item(1)
If Pshp Is Nothing Then GoTo lab
xCol = cell.Column + 1
Set xRg = Cells(cell.Row, xCol)
With Pshp
.LockAspectRatio = msoFalse
If .Width > xRg.Width Then .Width = xRg.Width * 2 / 3
If .Height > xRg.Height Then .Height = xRg.Height * 2 / 3
.Top = xRg.Top + (xRg.Height - .Height) / 2
.Left = xRg.Left + (xRg.Width - .Width) / 2
End With
lab:
Set Pshp = Nothing
Range("A2").Select
Next
Application.ScreenUpdating = True
End Sub

Observações: No código acima, A2:A5 é o intervalo de células que contém os endereços de URL das imagens que você deseja extrair. Altere as referências das células conforme necessário.

4. Em seguida, pressione F5 para executar o código. As imagens correspondentes serão extraídas dos URLs para a coluna adjacente e posicionadas centralizadas nas células, veja a imagem:

A screenshot of pictures extracted from URLs into adjacent cells in Excel


Inserir ou exibir imagens ou fotos a partir de URLs com um recurso incrível

O Kutools para Excel possui um recurso incrível – Inserir Imagens a partir do Caminho (URL). Com essa ferramenta, as imagens correspondentes são extraídas dos URLs de forma rápida e fácil.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

1. Clique em Kutools > Inserir > Inserir Imagens a partir do Caminho(URL), veja a imagem:

A screenshot of the Insert Pictures from Path (URL) option in Kutools tab in Excel

2. Na caixa de diálogo Inserir Imagens a partir do Caminho(URL), realize as seguintes operações:

  • Selecione a lista de células com URLs e o intervalo de células onde deseja colocar as imagens;
  • Especifique o tamanho das imagens conforme necessário na seção Tamanho da Imagem.
  • A screenshot of the Insert Pictures from Path (URL) dialog

3. Depois, clique em Ok, e todas as imagens serão extraídas dos URLs, veja a imagem:

A screenshot showing pictures inserted from URLs using Kutools


Inserir ou exibir imagens ou fotos a partir de caminhos de arquivos

Se você precisa inserir imagens a partir de caminhos de arquivos, aqui também apresentamos soluções para isso.

Inserir ou exibir imagens ou fotos a partir de caminhos de arquivos com código VBA

Você pode aplicar o código VBA a seguir para inserir imagens com base nos caminhos dos arquivos de imagem.

1. Pressione ALT + F11 para abrir o Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o código a seguir na janela do Módulo.

Código VBA: Inserir imagens a partir de um intervalo de caminhos de arquivos

Sub InsertPicFromFilePath()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xVal As String
    On Error Resume Next
    Set xRg = Application.InputBox("Please select file path cells:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xVal = xCell.Value
        If xVal <> "" Then
            ActiveSheet.Shapes.AddPicture xCell.Value, msoFalse, msoTrue, _
            xCell.Offset(0, 1).Left, xCell.Top, xCell.Height, _
            xCell.Height
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. Após inserir o código acima, pressione F5 para executar o código. Uma caixa de prompt será exibida, selecione as células com os caminhos dos arquivos, veja a imagem:

A screenshot of the VBA prompt to select file path cells in Excel

4. Depois, clique em OK, todas as imagens baseadas nos caminhos dos arquivos serão exibidas na próxima coluna, conforme mostrado na imagem:

A screenshot showing images displayed in Excel from file paths using VBA


Inserir ou exibir imagens ou fotos a partir de caminhos de arquivos com um recurso incrível

O recurso Inserir Imagens a partir do Caminho(URL) do Kutools para Excel também pode ajudar a exibir as imagens relativas a partir do caminho do arquivo.

Kutools para Excel - Repleto de mais de 300 ferramentas essenciais para o Excel. Aproveite recursos de IA gratuitos permanentemente! Faça o download agora!

1. Clique em Kutools > Inserir > Inserir Imagens a partir do Caminho(URL). Na caixa de diálogo exibida, especifique o intervalo do caminho do arquivo, o intervalo para saída das imagens e o tamanho da imagem conforme necessário, veja as imagens:

A screenshot of Insert Pictures from Path (URL) option in Kutools tab in Excel and the Insert Pictures from Path (URL) dialog

2. Após definir as opções, clique em Ok, as imagens serão inseridas nas células selecionadas imediatamente, veja a imagem:

A screenshot showing images inserted into Excel cells from file paths using Kutools


Inserir imagem ou foto em um comentário

Talvez seja fácil inserir uma imagem em uma célula, mas às vezes você pode querer inserir uma imagem em uma caixa de comentário. Como realizar essa tarefa?

1. Selecione e clique com o botão direito na célula onde deseja inserir o comentário e escolha Inserir Comentário, veja a imagem:

Dica: Se você já inseriu um comentário, ignore esta etapa.

A screenshot showing the Insert Comment option in Excel

2. Passe o cursor sobre as bordas da caixa de comentário até que o cursor se transforme em um ícone de quatro setas. Em seguida, clique com o botão direito e selecione Formatar Comentário, veja a imagem:

A screenshot showing the Format Comment option in Excel

3. Na caixa de diálogo Formatar Comentário, clique na guia Cores e Linhas e selecione Efeitos de Preenchimento na lista suspensa Cor, veja a imagem:

A screenshot of the Format Comment dialog showing the Colors and Lines tab in Excel

4. Em seguida, na caixa de diálogo Efeitos de Preenchimento, clique na guia Imagem e clique no botão Selecionar Imagem para escolher uma imagem que deseja inserir, veja a imagem:

A screenshot of the Fill Effects dialog box for selecting a picture in Excel comments

5. Depois, clique em OK > OK, a imagem será inserida na caixa de comentário, veja a imagem:

A screenshot of a picture inserted into an Excel comment box


Inserir imagem ou foto no cabeçalho ou rodapé

Se você deseja inserir uma imagem no cabeçalho ou rodapé da planilha do Excel, siga os passos desta seção:

1. Ative a planilha onde deseja inserir a imagem no cabeçalho ou rodapé.

2. Em seguida, clique em Inserir > Cabeçalho e Rodapé, e você será direcionado para a guia Ferramentas de Cabeçalho e Rodapé. Veja a imagem:

A screenshot showing the Header & Footer Tools tab in Excel

3. Para inserir uma imagem no cabeçalho ou rodapé, clique em uma das caixas de cabeçalho ou rodapé (esquerda, central ou direita) conforme necessário e, em seguida, clique em Imagem na guia Design, veja a imagem:

A screenshot of the Picture button in the Design tab of Header & Footer Tools in Excel

4. Em seguida, uma janela Inserir Imagens será exibida. Escolha a imagem que deseja adicionar e clique em Inserir. Agora, um espaço reservado & [Imagem] aparecerá na caixa de cabeçalho ou rodapé. Clique em qualquer lugar fora da caixa de cabeçalho ou rodapé e a imagem inserida será exibida conforme mostrado abaixo:

A screenshot of a picture displayed in the Excel worksheet header

Dica: Às vezes, você pode perceber que a imagem sobrepõe a área de dados da planilha, conforme mostrado abaixo. Isso ocorre porque a imagem é muito grande e não será redimensionada automaticamente para caber na caixa de cabeçalho ou rodapé.

A screenshot showing an oversized header image overlapping the data area in Excel

Para resolver esse problema, basta redimensionar a imagem no cabeçalho ou rodapé. Siga os passos abaixo:

1. Clique na seção do cabeçalho ou rodapé onde a imagem está localizada e, em seguida, clique em Formatar Imagem na guia Design, veja a imagem:

A screenshot showing the Format Picture option for resizing an image in the header or footer in Excel

2. Na caixa de diálogo Formatar Imagem, na guia Tamanho, ajuste o tamanho da imagem para caber na caixa de cabeçalho ou rodapé, veja a imagem:

A screenshot of the Format Picture dialog's Size tab for adjusting image size in Excel

3. Depois, clique em OK para obter o resultado desejado.


Inserir a mesma imagem ou foto em várias planilhas

Às vezes, você pode querer inserir uma imagem de logotipo em todas as planilhas do seu workbook. Normalmente, é possível usar a função Inserir para colocar a imagem em cada planilha manualmente. Para evitar esse processo demorado, o código VBA a seguir permite inserir a mesma imagem em uma célula específica de todas as planilhas de uma só vez. Siga os passos abaixo:

1. Pressione ALT + F11 para abrir o Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o código a seguir na janela do Módulo.

Código VBA: Inserir a mesma imagem em todas as planilhas:

Sub InsertImagetoallsheets()
'Updateby Extendoffice
    Dim I As Long
    Dim xPath As String
    Dim xShape As Shape
    Dim xRg As Range
    xPath = "C:\Users\AddinTestWin10\Desktop\my images\logo.png"
    If Dir(xPath) = "" Then
        MsgBox "Picture file was not found in path!", vbInformation, "KuTools for Excel"
        Exit Sub
    End If
    For I = 1 To ActiveWorkbook.Sheets.Count
        Set xRg = Sheets(I).Range("A1")
        Set xShape = Sheets(I).Shapes.AddPicture(xPath, True, True, xRg.Left, xRg.Top, xRg.Width, xRg.Height)
    Next
End Sub

Observação: No código acima, C:\Users\AddinTestWin10\Desktop\my images\logo.png é o caminho e nome da imagem, e A1 em Range("A1") é a célula onde deseja inserir a imagem. Altere conforme necessário.

3. Em seguida, pressione F5 para executar o código e a imagem específica será inserida na célula A1 de cada planilha imediatamente. Veja a demonstração abaixo:

A demonstration of inserting the same image into multiple worksheets in Excel using VBA


Inserir imagem ou foto atrás do conteúdo das células

Para deixar os dados da planilha mais atraentes, você pode usar uma imagem como fundo. Veja alguns métodos para inserir uma imagem atrás do conteúdo das células.

Inserir imagem ou foto atrás do conteúdo das células com o recurso Fundo

1. Abra a planilha onde deseja inserir uma imagem de fundo.

2. Em seguida, clique em Layout da Página > Fundo, veja a imagem:

A screenshot of the Page Layout tab showing the Background option in Excel

3. Na janela Inserir Imagens que será exibida, escolha uma imagem do seu computador, site ou OneDrive conforme necessário, veja a imagem:

A screenshot of the Insert Pictures dialog box for adding a background image in Excel

4. Agora, a imagem foi inserida na planilha como fundo, conforme mostrado abaixo:

A screenshot showing a worksheet with a background image in Excel

Dica: Para excluir a imagem de fundo, basta clicar em Layout da Página > Excluir Fundo. Veja a imagem:

A screenshot showing the Delete Background option in the Page Layout tab in Excel


Inserir imagem ou foto transparente atrás do conteúdo das células

Com o método acima, não é possível alterar a transparência da imagem de fundo inserida. Se a imagem de fundo for muito escura, pode dificultar a leitura dos dados da planilha. Nesta seção, veja como inserir uma imagem transparente atrás das células.

1. Clique em Inserir > Formas e selecione um retângulo, veja a imagem:

A screenshot of the Insert Shapes option in Excel for creating a custom background

2. Depois, desenhe a forma do tamanho desejado na planilha ativa.

3. Após desenhar a forma, a guia Ferramentas de Desenho será exibida na faixa de opções. Clique em Formatar > Contorno da Forma > Sem Contorno, veja a imagem:

A screenshot showing the Shape Outline option to remove the border of a shape in Excel

4. Em seguida, clique com o botão direito na forma e escolha Formatar Forma no menu de contexto, veja a imagem:

A screenshot of the Format Shape option

5. No painel expandido Formatar Forma, na guia Preenchimento & Linha, realize as seguintes operações:

  • Na seção Preenchimento, selecione a opção Preenchimento com imagem ou textura;
  • Clique no botão Inserir da Fonte da Imagem e escolha uma imagem para inserir;
  • Depois, ajuste a transparência da imagem conforme necessário na seção Transparência.
  • A screenshot of the Format Shape pane for adjusting transparency and inserting pictures in Excel

6. Agora, você verá que a forma preenchida com a imagem se parece com uma imagem de fundo, conforme mostrado acima.

Observação: Após inserir esse tipo de imagem de fundo, não será possível digitar texto dentro do intervalo da imagem.


Inserir imagem ou foto transparente atrás do conteúdo das células como marca d'água

Ambos os métodos acima possuem limitações: o primeiro não permite alterar a transparência da imagem e o segundo não permite digitar texto nas células dentro da área da imagem. Para resolver esses problemas, o recurso Inserir Marca d'água do Kutools para Excel pode ajudar.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

1. Clique em Kutools > Inserir > Inserir Marca d'água, veja a imagem:

A screenshot of the Insert Watermark option in Kutools tab in Excel

2. Na caixa de diálogo Inserir Marca d'água, selecione Marca d'água de Imagem e clique no botão Selecionar Imagem para escolher uma imagem, depois especifique a escala da imagem e marque a opção Erosão, veja a imagem:

A screenshot of the Insert Watermark dialog box

3. Depois, clique em Ok, a imagem será inserida na planilha como fundo.


Inserir um intervalo de células como formato de imagem ou foto no Excel

Você já tentou copiar um intervalo de células e inseri-lo como imagem no Excel? Nesta seção, apresento formas rápidas para realizar essa tarefa.

Inserir um intervalo de células como formato de imagem ou foto com o recurso Copiar como Imagem

No Excel, você pode usar a função Copiar como Imagem para copiar e inserir um intervalo de células como imagem.

1. Selecione o intervalo de células que deseja copiar e inserir como imagem.

2. Em seguida, clique em Página Inicial > Copiar > Copiar como Imagem, veja a imagem:

A screenshot showing the Copy as Picture option in Excel's Home tab

3. Na caixa de diálogo Copiar Imagem, selecione Imagem na seção Formato, veja a imagem:

A screenshot of the Copy Picture dialog in Excel for selecting format options

4. Depois, clique em OK. Agora, basta pressionar Ctrl + V para colar a imagem em qualquer lugar do workbook.

A screenshot of an image created from a copied range of cells in Excel


Inserir um intervalo de células como formato de imagem ou foto com a ferramenta Câmera

No Excel, existe a ferramenta Câmera, que permite tirar uma foto dos dados selecionados e colá-la como imagem. Quando os dados originais mudam, a imagem copiada é atualizada dinamicamente.

Primeiro, exiba a ferramenta Câmera na faixa de opções e depois utilize-a.

1. Clique no ícone Personalizar Barra de Ferramentas de Acesso Rápido e depois em Mais Comandos, veja a imagem:

A screenshot of the More Commands option from the Customize Quick Access Toolbar menu

2. Na caixa de diálogo Opções do Excel, realize as seguintes operações:

  • Selecione Todos os Comandos na lista suspensa Escolher comandos de;
  • Depois, role para selecionar Câmera na lista;
  • Em seguida, clique em Adicionar para adicionar essa ferramenta à Barra de Ferramentas de Acesso Rápido;
  • Por fim, clique em OK para fechar essa caixa de diálogo.
  • A screenshot of Excel Options dialog to add the Camera tool to the ribbon

3. A ferramenta Câmera será exibida na faixa de opções, veja a imagem:

A screenshot showing the Camera tool added to the Quick Access Toolbar in Excel

4. Depois, selecione o intervalo de células que deseja transformar em imagem.

5. Em seguida, clique na ferramenta Câmera, vá para a planilha e clique em qualquer lugar. O intervalo de dados será inserido como imagem, conforme mostrado na demonstração abaixo:

A demonstration of using the Camera tool to create an image of a data range in Excel


Inserir um intervalo de células como formato de imagem ou foto com um recurso útil

Se você possui o Kutools para Excel, com o recurso Biblioteca de AutoTexto, pode salvar os dados selecionados na Biblioteca de AutoTexto e depois usá-los como imagem ou texto futuramente, conforme desejar.

Kutools para Excel - Repleto de mais de 300 ferramentas essenciais para o Excel. Aproveite recursos de IA gratuitos permanentemente! Faça o download agora!

1. Selecione o intervalo de dados que deseja inserir como imagem.

2. Em seguida, clique em Kutools > Navegação, veja a imagem:

A screenshot showing Kutools for Excel's Navigation option in Excel ribbon

3. No painel expandido Navegação, clique no ícone Biblioteca de AutoTexto e depois clique no ícone Adicionar Conteúdo Selecionado ao AutoTexto, veja a imagem:

A screenshot of adding selected content to Resource Library

4. Na caixa de diálogo Adicionar ao AutoTexto, especifique um nome para o item e selecione o grupo desejado. Veja a imagem:

A screenshot of the New Resource Library Entry dialog

5. Depois, clique em Adicionar para incluir na Biblioteca de AutoTexto. Se quiser inserir esse intervalo como imagem, basta clicar em uma célula para posicionar a imagem, localizar o item salvo no painel Biblioteca de AutoTexto e clicar em Inserir Como > Imagem (EMF) no menu suspenso do item. O intervalo de dados será inserido na planilha como imagem, veja as imagens:

A screenshot showing data inserted as a picture using Kutools for Excel's Resource Library


Inserir imagem ou foto dinamicamente com base no valor da célula

Nesta seção, mostro como exibir uma imagem específica com base no valor de uma célula. Por exemplo, quero mostrar a imagem correspondente ao selecionar um item específico em uma célula de lista suspensa. Ao escolher outro item, a imagem será alterada dinamicamente, conforme mostrado na demonstração abaixo:

A demonstration of dynamically changing images based on selected drop-down values in Excel

Inserir imagem ou foto dinamicamente com base no valor da célula usando o recurso Nome da célula

Normalmente, no Excel, é possível criar um nome de célula dinâmico e usar a imagem vinculada para resolver essa tarefa.

1. Primeiro, crie duas colunas com os nomes dos produtos e as imagens correspondentes, veja a imagem:

A screenshot of two columns containing product names and their corresponding images in Excel

2. Depois, crie uma lista suspensa para os valores das células. Clique em uma célula para exibir a lista suspensa, depois clique em Dados > Validação de Dados > Validação de Dados, veja a imagem:

A screenshot showing the Data Validation option in Excel for creating a drop-down list

3. Na caixa de diálogo Validação de Dados, na guia Configurações, escolha Lista na opção Permitir e selecione as células para criar a lista suspensa a partir da caixa Fonte, veja a imagem:

A screenshot of the Data Validation dialog box for selecting list options in Excel

4. Clique em OK, e a lista suspensa com os valores das células será criada. Selecione um item da lista suspensa, veja a imagem:

A screenshot of a drop-down list created in Excel for selecting products

5. Depois, clique em Fórmulas > Definir Nome, veja a imagem:

A screenshot showing the Define Name option in Excel's Formulas tab

6. Na caixa de diálogo Novo Nome, realize as seguintes operações:

  • Digite o nome myimage na caixa de texto Nome;
  • Depois, copie e cole esta fórmula: =ÍNDICE(Sheet11!$A$2:$B$6;CORRESP(Sheet11!$E$2;Sheet11!$A$2:$A$6;0);2) na caixa Refere-se a.

    A screenshot of the New Name dialog box with a dynamic formula for referencing images in Excel

    Observação: Na fórmula acima:

    • Sheet11!$A$2:$B$6: é a planilha e o intervalo que contém os valores e imagens que você deseja usar;
    • Sheet11!$E$2: é a célula na planilha onde você criou a lista suspensa;
    • Sheet11!$A$2:$A$6: é a lista de células usada como base para a lista suspensa;
    • O número2 é o número da coluna que contém as imagens. Se suas imagens estiverem na coluna C, insira3.

7. Depois, clique em OK, copie e cole a imagem correspondente ao valor da célula em E2 do intervalo original para a célula F2, veja a imagem:

A screenshot of a copied picture next to a drop-down list in Excel

8. Em seguida, selecione a imagem na célula F2 e digite a fórmula =myimage (myimage é o nome da célula criado no passo6) na barra de fórmulas, veja a imagem:

A screenshot showing how to link a picture to a named range using a formula in Excel

9. Após digitar a fórmula, pressione Enter. Agora, ao escolher um item da lista suspensa, a imagem correspondente será exibida imediatamente. Veja a imagem:

A screenshot showing a dynamically updated image based on a selected drop-down value in Excel


Inserir imagem ou foto dinamicamente com base no valor da célula com um recurso prático

O método acima pode ser difícil para a maioria das pessoas. Aqui, apresento um recurso prático – Lista Suspensa de Imagens do Kutools para Excel. Com essa ferramenta, você pode criar várias listas suspensas com imagens correspondentes em apenas alguns cliques.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

1. Primeiro, crie duas colunas com os nomes dos produtos e as imagens correspondentes na sua planilha.

2. Depois, clique em Kutools > Lista Suspensa > Lista Suspensa de Imagens, veja a imagem:

A screenshot of the Picture Drop-down List option in Kutools for Excel

3. Na caixa de diálogo Lista Suspensa de Imagens, se você já criou as colunas de valores e imagens, ignore o passo1. Depois, selecione o intervalo de dados original, o intervalo de imagens e o intervalo de saída, veja a imagem:

A screenshot of the Picture Drop-down List dialog box for linking images to drop-down lists

4. Depois, clique em Ok, as listas suspensas com imagens serão criadas nas células selecionadas. Ao selecionar um item na célula suspensa, a imagem correspondente será exibida imediatamente, veja a demonstração abaixo:

A demonstration of creating drop-down lists with dynamic images using Kutools


Exportar ou salvar todas as imagens ou fotos de um arquivo Excel

Se houver várias imagens no seu workbook e você deseja extrair e salvar todas as imagens do arquivo Excel em uma pasta, veja como resolver essa tarefa no Excel:

Exportar ou salvar todas as imagens ou fotos do Excel com o recurso Salvar Como

Normalmente, você pode usar o recurso Salvar Como para salvar todas as imagens do workbook. Veja como fazer:

1. Clique em Arquivo > Salvar Como. Na janela Salvar Como, especifique uma pasta para salvar os arquivos exportados e escolha Página da Web (*.htm;*.html) na lista suspensa Especificar Formato de Salvamento, veja a imagem:

A screenshot showing the Save As window in Excel for saving as a Web Page

2. Depois, clique em Salvar. Vá até a pasta específica e você verá dois arquivos: um em formato HTML e outro é uma pasta que contém as imagens, gráficos ou outros objetos do workbook. Veja a imagem:

A screenshot showing the saved HTML file and folder containing images exported from Excel

3. Agora, basta arrastar apenas as imagens para outra pasta conforme necessário.

Observação: Ao usar o recurso Salvar Como, cada imagem será salva duas vezes, uma em tamanho menor e outra maior. Assim, você pode salvar as imagens em alta resolução conforme desejar.


Exportar ou salvar todas as imagens ou fotos do Excel alterando a extensão do arquivo

Para salvar todas as imagens de um arquivo Excel, você também pode alterar a extensão do arquivo para RAR. Veja como fazer:

1. Altere a extensão do arquivo xlsx para rar, conforme mostrado na imagem:

A screenshot demonstrating how to change an Excel file extension to .rar

2. Depois, extraia o arquivo e você verá3 pastas e1 arquivo na pasta, veja a imagem:

A screenshot of the unzipped folder structure after changing an Excel file to .rar format

3. Em seguida, clique para abrir a pasta xl e depois a pasta media. Todas as imagens estarão armazenadas aqui, sem duplicatas, veja a imagem:

A screenshot of the media folder containing all images exported from Excel


Exportar ou salvar todas as imagens ou fotos do Excel com um recurso avançado

Se você possui o Kutools para Excel, com o recurso Exportar Gráfico, é possível exportar rapidamente objetos específicos, como imagens, gráficos e formas para o formato de imagem desejado.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

1. Clique em Kutools Plus > Importar & Exportar > Exportar Gráfico, veja a imagem:

A screenshot showing the Export Graphics option in Kutools Plus tab in Excel

2. Na caixa de diálogo Exportar Gráfico, realize as seguintes operações:

  • Escolha a opção Imagens na lista suspensa Tipo;
  • Especifique uma pasta para salvar as imagens exportadas;
  • Depois, clique na lista suspensa Formato de Exportação para escolher o formato desejado para suas imagens.
  • A screenshot of the Export Graphics dialog box

3. Por fim, clique em Ok, todas as imagens do workbook atual serão salvas na pasta especificada, veja a imagem:

A screenshot showing pictures exported using Kutools for Excel's Export Graphics feature


Renomear nomes de imagens em uma pasta com base em uma lista de células no Excel

Se você possui muitas imagens em uma pasta e deseja renomear todas de forma fácil no Excel, veja como realizar essa tarefa:

No Excel, primeiro, liste todos os nomes antigos das imagens em uma coluna, depois digite os novos nomes e, por fim, aplique um código VBA para substituir todos os nomes antigos pelos novos de uma só vez. Siga os passos abaixo:

1. Liste todos os nomes das imagens em uma lista de células ou use o código abaixo para listar todos os nomes de imagens de uma pasta específica sem digitar manualmente um por um.

2. Pressione ALT + F11 para abrir o Microsoft Visual Basic for Applications.

3. Clique em Inserir > Módulo e cole o macro a seguir na janela do Módulo.

Código VBA: listar todos os nomes de imagens de uma pasta

Sub MainList()
'Updateby Extendoffice
On Error Resume Next
Set xRg = Application.InputBox("Please select a cell to put the filenames:", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xRg = xRg(1)
Set Folder = Application.FileDialog(msoFileDialogFolderPicker)
If Folder.Show <> -1 Then Exit Sub
xDir = Folder.SelectedItems(1)
Call ListFilesInFolder(xRg, xDir, True)
End Sub
Sub ListFilesInFolder(ByVal xRg As Range, ByVal xFolderName As String, ByVal xIsSubfolders As Boolean)
Dim xFileSystemObject As Object
Dim xFolder As Object
Dim xSubFolder As Object
Dim xFile As Object
Dim rowIndex As Long
Set xFileSystemObject = CreateObject("Scripting.FileSystemObject")
Set xFolder = xFileSystemObject.GetFolder(xFolderName)
rowIndex = 1
For Each xFile In xFolder.Files
xRg.Formula = xFile.Name
Set xRg = xRg.Offset(rowIndex)
rowIndex = 1
Next xFile
If xIsSubfolders Then
For Each xSubFolder In xFolder.SubFolders
ListFilesInFolder xRg, xSubFolder.Path, True
Next xSubFolder
End If
Set xFile = Nothing
Set xFolder = Nothing
Set xFileSystemObject = Nothing
End Sub

4. Depois, pressione F5 para executar o código. Uma caixa de prompt será exibida, clique em uma célula para exibir os nomes das imagens, veja a imagem:

A screenshot showing the prompt to select a cell for outputting filenames in Excel

5. Depois, clique em OK. Outra caixa Procurar será exibida, selecione a pasta que contém as imagens que deseja listar, veja a imagem:

A screenshot of the Browse dialog box for selecting a folder containing images

6. Clique em OK, todos os nomes das imagens da pasta específica serão listados nas células, veja a imagem:

A screenshot showing all image names from a folder listed in Excel

7. Depois, digite os novos nomes necessários em outra coluna, conforme mostrado abaixo:

A screenshot showing new image names entered in another column in Excel

8. Em seguida, aplique o código abaixo para renomear as imagens. Continue pressionando ALT + F11 para abrir o Microsoft Visual Basic for Applications.

9. Clique em Inserir > Módulo e cole o macro a seguir na janela do Módulo.

Código VBA: Renomear vários arquivos em uma pasta

Sub RenameFiles()
'Updateby Extendoffice
Dim xDir As String
Dim xFile As String
Dim xRow As Long
With Application.FileDialog(msoFileDialogFolderPicker)
    .AllowMultiSelect = False
If .Show = -1 Then
    xDir = .SelectedItems(1)
    xFile = Dir(xDir & Application.PathSeparator & "*")
    Do Until xFile = ""
        xRow = 0
        On Error Resume Next
        xRow = Application.Match(xFile, Range("A:A"), 0)
        If xRow > 0 Then
            Name xDir & Application.PathSeparator & xFile As _
            xDir & Application.PathSeparator & Cells(xRow, "B").Value
        End If
        xFile = Dir
    Loop
End If
End With
End Sub

Observação: No código acima, A:A indica a lista de nomes antigos das imagens que deseja renomear e B contém os novos nomes que deseja usar. Altere conforme necessário.

10. Depois, pressione F5 para executar o código. Na janela Procurar exibida, selecione a pasta que contém as imagens que deseja renomear, veja a imagem:

A screenshot of the Browse dialog box for selecting a folder containing images

11. Depois, clique em OK, todos os nomes das imagens serão substituídos pelos novos, conforme mostrado abaixo:

A screenshot showing renamed image files listed in Excel


Ampliar ou reduzir a imagem ao clicar nela

Suponha que você tenha inserido uma imagem pequena na planilha e deseja ampliá-la ao clicar e reduzi-la ao clicar novamente, conforme mostrado na demonstração abaixo. Veja como realizar essa tarefa no Excel:

A demo GIF showing an image being enlarged and shrunk in Excel on click

Para ampliar ou reduzir o tamanho da imagem ao clicar nela, use o código a seguir. Siga os passos abaixo:

1. Clique com o botão direito na imagem e escolha Atribuir Macro, veja a imagem:

A screenshot showing how to assign a macro to an image in Excel

2. Na caixa de diálogo Atribuir Macro exibida, clique no botão Novo, veja a imagem:

A screenshot of the Assign Macro dialog box with the New button highlighted

3. Na janela Microsoft Visual Basic for Applications, copie e cole o código abaixo entre os comandos Sub e End Sub. Veja a imagem:

Dim shp As Shape
    Dim big As Single, small As Single
    Dim shpDouH As Double, shpDouOriH As Double
    big = 3  
    small = 1
    On Error Resume Next
    Set shp = ActiveSheet.Shapes(Application.Caller)
    With shp
        shpDouH = .Height
        .ScaleHeight 1, msoTrue, msoScaleFromTopLeft
        shpDouOriH = .Height
     
        If Round(shpDouH / shpDouOriH, 2) = big Then
            .ScaleHeight small, msoTrue, msoScaleFromTopLeft
            .ScaleWidth small, msoTrue, msoScaleFromTopLeft
            .ZOrder msoSendToBack
        Else
            .ScaleHeight big, msoTrue, msoScaleFromTopLeft
            .ScaleWidth big, msoTrue, msoScaleFromTopLeft
            .ZOrder msoBringToFront
        End If
    End With

A screenshot of the VBA code to enlarge and shrink images in Excel when clicked

4. Depois, pressione Alt + Q para fechar o Microsoft Visual Basic for Applications. Agora, ao clicar na imagem, ela será ampliada para o tamanho especificado e, ao clicar novamente, será reduzida ao tamanho original, conforme mostrado na demonstração abaixo:

A demo GIF showing an image being enlarged and shrunk in Excel on click


Manter uma imagem sempre visível ao rolar a planilha

Às vezes, você pode querer manter uma imagem visível na tela da planilha mesmo ao rolar para cima ou para baixo, para visualizá-la o tempo todo. Nesta seção, apresento um truque rápido para isso no Excel. Siga os passos abaixo:

1. Primeiro, insira a imagem que deseja usar.

2. Depois, clique com o botão direito na guia da planilha que contém a imagem que deseja manter sempre visível e escolha Exibir Código no menu de contexto. Na janela Microsoft Visual Basic for Applications exibida, copie e cole o código abaixo no Módulo em branco:

Código VBA: Manter uma imagem sempre visível em uma planilha

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    If Target.Cells.Count > 1 Then Exit Sub
        With ActiveSheet.Shapes("Picture1")
            .Top = ActiveWindow.VisibleRange.Top + 5
            .Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
        End With
    Application.ScreenUpdating = False
End Sub

A screenshot showing VBA code to make a picture float while scrolling in Excel

Observação: Neste código, Picture1 é o nome da imagem inserida. Altere conforme necessário.

3. Depois, salve e feche a janela do código. Agora, ao rolar a planilha e clicar em uma célula, a imagem será mantida no canto superior direito da planilha. Veja a imagem:

A screenshot showing a picture floating in the top-right corner of a worksheet in Excel


Excluir imagens ou fotos da planilha ativa / de um intervalo de células

Você conhece formas rápidas de excluir todas as imagens de uma planilha, de um intervalo de células ou do workbook atual? Nesta seção, apresento métodos para resolver essa tarefa no Excel.

Excluir imagens ou fotos da planilha ativa com código VBA

Para excluir as imagens da planilha atual, use o código VBA abaixo. Veja como fazer:

1. Ative a planilha que contém as imagens que deseja excluir.

2. Pressione ALT + F11 para abrir o Microsoft Visual Basic for Applications.

3. Clique em Inserir > Módulo e cole o macro a seguir na janela do Módulo.

Código VBA: Excluir todas as imagens da planilha atual

Sub DeleteAllPics()
'Updateby Extendoffice
Dim Pic As Object
For Each Pic In ActiveSheet.Pictures
Pic.Delete
Next Pic
End Sub

4. Depois, pressione F5 para executar o código. Todas as imagens da planilha ativa serão excluídas imediatamente.


Excluir imagens ou fotos de um intervalo de células com código VBA

Se você precisa excluir imagens apenas de um intervalo de células, use o código simples abaixo.

1. Pressione ALT + F11 para abrir o Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o macro a seguir na janela do Módulo.

Código VBA: Excluir imagens de um intervalo de células

Sub DeletePic()
'Updateby Extendoffice
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("B4:C6")
    For Each xPic In ActiveSheet.Pictures
        Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
        If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Observação: No código acima, B4:C6 é o intervalo do qual deseja excluir as imagens.

3. Depois, pressione F5 para executar o código. As imagens do intervalo selecionado serão excluídas imediatamente, veja as imagens:

A screenshot showing pictures being deleted from a selected range in Excel


Excluir imagens ou fotos da planilha ativa, planilhas selecionadas ou todas as planilhas com um recurso prático

Se você possui o Kutools para Excel, com o recurso Excluir Ilustrações & Objetos, pode excluir rapidamente imagens de uma planilha, de planilhas selecionadas ou do workbook inteiro.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

1. Clique em Kutools > Excluir > Excluir Ilustrações & Objetos, veja a imagem:

A screenshot showing the Kutools Delete Illustrations & Objects feature in Excel

2. Na caixa de diálogo Excluir Ilustrações & Objetos, marque Imagens na seção Excluir e especifique o escopo de onde deseja excluir as imagens na seção Pesquisar em, veja a imagem:

A screenshot of the Delete Illustrations & Objects dialog

3. Depois, clique em Ok, todas as imagens serão excluídas da planilha, das planilhas selecionadas ou do workbook inteiro, conforme especificado.

Melhores Ferramentas de Produtividade para Office

🤖 Kutools AI Aide: Revolucione a análise de dados com base em: Execução Inteligente|Gerar Código |Criar Fórmulas Personalizadas|Analisar Dados e Gerar Gráficos |Acionar Funções Aprimoradas
Recursos populares: Encontrar, Destacar ou Marcar Duplicados|Excluir Linhas em Branco|Combinar Colunas ou Células sem perder dados| Arredondar...
Super PROC: PROC com múltiplos critérios|PROC com múltiplos valores|Procura em várias planilhas|Correspondência Fuzzy....
Lista Suspensa Avançada: Crie rapidamente Lista Suspensa|Lista Suspensa Dependente|Lista Suspensa com Múltipla Seleção....
Gerenciador de Colunas: Adicionar um número específico de colunas |Mover Colunas |Alternar o Estado de Visibilidade de Colunas Ocultas| Comparar Intervalo & Colunas...
Recursos em Destaque: Grade de foco|Visualização de Design|Barra de fórmulas aprimorada|Gerenciador de Pasta de Trabalho & Planilha|Biblioteca de AutoTexto|Selecionador de Data|Mesclar Dados |Criptografar/Descriptografar Células|Enviar Email por Lista|Super Filtro|Filtro Especial (filtrar negrito/itálico/tachado...)...
Top15 Conjuntos de Ferramentas:12 Ferramentas de Texto (Adicionar Texto, Excluir Caracteres Específicos, ... ) |Mais de50 Tipos de Gráficos (Gráfico de Gantt, ... ) |Mais de40 Fórmulas Práticas (Calcular a idade com base na data de nascimento, ... ) |19 Ferramentas de Inserção (Inserir Código QR, Inserir Imagem a partir do Caminho, ... ) |12 Ferramentas de Conversão (Converter em Palavras, Conversão de Moeda, ... ) |7 Ferramentas de Mesclar & Dividir (Mesclar Linhas Avançado, Dividir Células, ... ) |... e muito mais
Use o Kutools no idioma de sua preferência – compatível com Inglês, Espanhol, Alemão, Francês, Chinês e mais de40 outros!

Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência sem igual. Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo.Clique aqui para obter o recurso que você mais precisa...


Office Tab traz interface de abas para o Office e facilita muito seu trabalho

  • Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas abas da mesma janela, em vez de novas janelas.
  • Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!