É fácil para a maioria de nós inserir imagens armazenadas no computador na planilha. Por favor, faça o seguinte:

1. Na planilha, clique onde deseja inserir imagens.

2. Então clique inserção > Fotografias > Este aparelho, veja a captura de tela:

3. No estalou para fora Inserir imagem janela, abra a pasta que contém as imagens e segure Ctrl para selecionar as imagens que deseja inserir, consulte a captura de tela:

4. Então clique inserção botão, as imagens selecionadas foram inseridas na folha. Agora, você pode ajustar ou redimensionar as imagens para as células de que precisa, veja a captura de tela:

Se você tiver o Excel 2013 ou versões posteriores, pode inserir as imagens da web ou do One Drive, faça o seguinte:

1. Na planilha, clique onde deseja inserir imagens.

2. Então clique inserção > Fotografias > Fotos on-line, veja a captura de tela:

3. A seguinte janela será exibida. No Fotos on-line seção, digite o que você está procurando na caixa de texto e pressione Entrar chave. Todas as imagens correspondentes são pesquisadas de uma vez, veja a captura de tela:

4. Em seguida, selecione as fotos desejadas e clique em inserção botão. Depois de inserir as imagens, redimensione ou ajuste as imagens para a posição que você precisa.

O código VBA a seguir pode ajudá-lo a inserir várias imagens em células com base no tamanho da célula. Por favor, faça o seguinte:

1. Ajuste o tamanho da célula em que deseja colocar a imagem e selecione as células.

2. Então, mantenha pressionado o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

3. Clique inserção > Móduloe cole a macro a seguir no Módulo janela.

Código VBA: insira 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 o botão F5 chave para executar este código. No Abra janela, escolha a pasta que contém as imagens, selecione as imagens que deseja inserir e clique em Abra botão, e todas as imagens selecionadas foram inseridas em sua seleção com base no tamanho da célula. Veja a imagem:

Se você não estiver familiarizado com o código do VBA, aqui, você pode usar um recurso avançado - Importar imagens of Kutools for Excel. Com esse recurso útil, você pode importar várias imagens para as células de forma rápida e fácil.

Depois de instalar Kutools for Excel, execute as seguintes etapas:

1. Clique Kutools Plus > Importar e Exportar > Importar imagens, veja a captura de tela:

2. No estalou para fora Importar imagens caixa de diálogo, faça as seguintes operações:

• Especifique a ordem das imagens na lista suspensa Ordem de importação, você pode escolher Preencher verticalmente célula após célula or Preencher horizontalmente célula após célula;
• Então clique Adicionar botão para selecionar os arquivos de imagem ou pasta para adicionar as imagens no Lista de fotos;
• Clique na Tamanho de importação botão, no Importar tamanho da imagem caixa de diálogo, selecione o Tamanho de célula correspondente opção.
• 

3. Depois de terminar as configurações, por favor clique importação botão, e agora, outro Importar imagens é exibido, especifique as células de destino para as quais você importará a imagem, consulte a captura de tela:

4. Então clique OK botão, todas as imagens selecionadas foram inseridas para corresponder ao tamanho de células específicas, conforme mostrado abaixo:

O código VBA a seguir pode ajudá-lo a inserir várias imagens com seus nomes rapidamente, faça o seguinte:

1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. Clique Inserçãot> Móduloe cole a macro a seguir no Módulo janela.

Código VBA: insira várias imagens que correspondam a seus 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

Note: No código acima, você pode alterar a altura e largura da imagem dentro dos scripts “.ShapeRange.Altura = 60",".ShapeRange.Largura = 60”Para sua necessidade.

3. Então aperte F5 para executar este código, e na janela aberta, selecione a pasta que contém as imagens que você deseja inserir, veja a imagem:

4. E então, clique OK botão, uma caixa de prompt é exibida, selecione as células que contêm os nomes das imagens, consulte a captura de tela:

5. Continue clicando OK botão, e outra caixa de prompt é seguida, selecione as células para as quais deseja gerar as imagens, consulte a captura de tela:

6. Finalmente, clique em OK, e as imagens foram inseridas nas células com base em seus nomes de uma só vez, consulte a captura de tela:

Se você tem Kutools for Excel, Com o seu Corresponder imagens de importação recurso, você pode inserir as imagens com base nos nomes das imagens de forma rápida e fácil.

Depois de instalar Kutools for Excel, por favor, faça o seguinte:

1. Clique Kutools Plus > Importar e Exportar > Corresponder imagens de importação, veja a captura de tela:

2. No estalou para fora Combinar imagem de importação caixa de diálogo, execute as seguintes operações:

• Especifique a ordem das imagens na lista suspensa Ordem de importação, você pode escolher Preencher verticalmente célula após célula or Preencher horizontalmente célula após célula;
• Então, do Alcance da partida caixa de texto, selecione os nomes de imagem nos quais deseja inserir imagens;
• E então, clique Adicionar botão para selecionar os arquivos de imagem ou pasta para adicionar as imagens no Lista de fotos;
• Em seguida, você deve especificar o tamanho da imagem. Por favor clique Tamanho de importação botão, no Importar tamanho da imagem caixa de diálogo, selecione um tamanho de imagem que você precisa.
• 

3. Depois de terminar as configurações, por favor clique importação botão, escolha uma célula ou uma lista de células para localizar as imagens do Corresponder imagens de importação caixa de diálogo, veja a captura de tela:

4. Então clique OK, e todas as imagens cujos nomes correspondem aos valores das células foram inseridas, consulte a captura de tela:

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

1. Primeiro, ajuste o tamanho da célula adjacente em que deseja localizar as imagens.

2. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

3. Clique inserção > Móduloe cole a macro a seguir no Módulo janela.

Código VBA: insira imagens 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

Notas: No código acima, A2: A5 é o intervalo de células que contém os endereços de URL para os quais deseja extrair as imagens, você deve alterar as referências das células conforme sua necessidade.

4. Então aperte F5 chave para executar este código, as imagens correspondentes serão extraídas dos URLs para a coluna adjacente e colocadas no centro das células, veja a captura de tela:

Kutools for Excel tem um recurso incrível - Inserir imagens do caminho (URL). Com este utilitário, as imagens correspondentes serão extraídas dos URLs de forma rápida e fácil.

Depois de instalar Kutools for Excel, execute as seguintes etapas:

1. Clique Kutools > inserção > Inserir imagens do caminho (URL), veja a captura de tela:

2. No estalou para fora Inserir imagens do caminho (URL) caixa de diálogo, defina as seguintes operações:

• Selecione a lista de células de URL e um intervalo de células onde deseja colocar as imagens;
• Especifique o tamanho das imagens que você precisa do Tamanho da Imagem seção.
• 

3. E então, clique Ok botão, e todas as imagens foram extraídas dos URLs, consulte a captura de tela:

Você pode aplicar o seguinte código VBA para inserir as imagens com base nos caminhos do arquivo de imagem.

1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe cole o seguinte código no Módulo Janela.

Código VBA: insira imagens de uma variedade de caminhos de arquivo

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 este código, em seguida, uma caixa de prompt é exibida, selecione as células do caminho do arquivo, consulte a captura de tela:

4. Então clique OK botão, todas as imagens baseadas nos caminhos de arquivo foram exibidas na próxima coluna como mostrado a seguir:

Kutools for Excel'S Inserir imagens do caminho (URL) recurso também pode ajudá-lo a exibir as imagens relativas do caminho do arquivo.

Depois de instalar Kutools for Excel, por favor, faça o seguinte:

1. Clique Kutools > inserção > Inserir imagens do caminho (URL), na caixa de diálogo exibida, especifique o intervalo do caminho do arquivo, intervalo para a saída de imagens, tamanho da imagem conforme necessário, consulte as capturas de tela:

2. Depois de definir as opções, clique em Ok botão, as imagens serão inseridas nas células selecionadas de uma vez, veja a captura de tela:

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

Para resolver este problema, você só precisa redimensionar a imagem no cabeçalho ou rodapé, siga as seguintes etapas:

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

2. No Formatar imagem caixa de diálogo, sob o Tamanho guia, ajuste o tamanho da imagem para caber na caixa de seção do cabeçalho ou rodapé, veja a captura de tela:

3. E então, clique OK, você obterá o resultado conforme necessário.

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

2. Então clique layout de página > BACKGROUND, veja a captura de tela:

3. No estalou para fora Inserir imagens janela, escolha uma imagem do seu computador, site ou OneDrive conforme necessário, consulte a captura de tela:

4. Agora, a imagem foi inserida na planilha como plano de fundo conforme a imagem abaixo mostrada:

Com o método acima, você não pode alterar o transparente da imagem de fundo inserida, portanto, se a cor da imagem de fundo for pesada, não será conveniente para você ler os dados da planilha. Nesta seção, falarei sobre como inserir uma imagem transparente atrás das células.

1. Clique inserção > Formase selecione uma forma de retângulo, veja a captura de tela:

2. Em seguida, desenhe uma forma tão grande quanto você precisa na planilha ativa.

3. Depois de desenhar a forma, um Ferramentas de desenho guia é exibida na faixa de opções e, em seguida, clique em Formato > Shape Outline > Sem contorno, veja a captura de tela:

4. E então, clique com o botão direito na forma e escolha Formatar Forma no menu de contexto, veja a captura de tela:

5. No expandido Formatar Forma painel, sob o Preenchimento e linha guia, faça as seguintes operações:

• Sob o Preencher seção, selecione Preenchimento de imagem ou textura opção;
• Clique inserção botão do Fonte da imageme escolha uma imagem que deseja inserir;
• Em seguida, ajuste a transparência da imagem de acordo com sua necessidade do Transparênciaseção y.
• 

6. E então, você verá que a forma preenchida com imagens se parece com uma imagem de fundo, como mostrado na imagem acima.

Note: Após inserir este tipo de imagem de fundo, você não poderá inserir nenhum texto dentro do intervalo da imagem.

Ambos os métodos acima têm suas próprias limitações, o primeiro método não pode alterar a transparência da imagem, o segundo método não permite inserir texto nas células dentro da área da imagem. Para resolver esses problemas, Kutools for Excel'S Inserir marca de água recurso pode lhe fazer um favor.

Depois de instalar Kutools for Excel, por favor, faça o seguinte:

1. Clique Kutools > inserção > Inserir marca de água, veja a captura de tela:

2. No estalou para fora Inserir marca de água caixa de diálogo, selecione Marca d'água de imagemE clique em Selecionar imagem para escolher uma imagem que deseja inserir e, em seguida, especifique a escala da imagem e marque a opção Desbotamento, consulte a imagem:

3. Então clique Ok botão, a imagem foi inserida na planilha como imagem de fundo.

No Excel, você pode usar o Copiar como imagem função 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. Então clique INÍCIO > Copiar > Copiar como imagem, veja a captura de tela:

3. No estalou para fora Copiar imagem diálogo, selecione Imagem do Formato seção, veja a captura de tela:

4. Então clique OK botão, agora, você só precisa pressionar Ctrl + V para colar a imagem em qualquer lugar da pasta de trabalho.

No Excel, existe um Câmara ferramenta que pode ajudá-lo a tirar uma foto para os dados selecionados e, em seguida, colá-la como imagem. Quando os dados originais forem alterados, a imagem copiada será alterada dinamicamente.

Primeiro, você deve exibir o Câmara na fita e, em seguida, aplique-a.

1. Clique Personalize a barra de ferramentas de acesso rápido ícone e clique em Mais comandos opção, veja a captura de tela:

2. No aberto Opções do Excel caixa de diálogo, execute as seguintes operações:

• Selecionar Todos os Comandos do Escolha comandos de suspenso;
• Em seguida, role para selecionar Câmara na caixa de listagem;
• E então, clique Adicionar botão para adicionar esta ferramenta ao Personalize a barra de ferramentas de acesso rápido;
• Finalmente, clique em OK para fechar esta caixa de diálogo.
• 

3. E a Câmara ferramenta foi exibida na faixa de opções, consulte a captura de tela:

4. Em seguida, selecione o intervalo de células em que deseja uma imagem.

5. E então, clique no Câmara ferramenta, vá para a planilha e clique em qualquer lugar, o intervalo de dados será inserido como uma imagem conforme a demonstração abaixo:

Se você tem Kutools for Excel, Com o seu Biblioteca recurso, você pode salvar os dados selecionados no Bibliotecae, em seguida, use-o como imagem ou texto para o futuro, conforme desejar.

Depois de instalar Kutools for Excel, por favor, faça o seguinte:

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

2. Então clique Kutools > Navegação, veja a captura de tela:

3. No expandido Navegação painel, clique em Biblioteca ícone e clique em Adicionar conteúdo selecionado à Biblioteca de Recursos ícone, veja a captura de tela:

4. No Nova entrada da biblioteca de recursos caixa de diálogo, especifique um nome para este item e, em seguida, selecione um grupo que deseja adicionar. Veja a imagem:

5. Então clique Adicionar botão para adicioná-lo a Biblioteca painel. Se você deseja inserir este intervalo como imagem, basta clicar em uma célula para localizar a imagem e, em seguida, encontrar o item salvo no Biblioteca painel e clique em Inserir como > Imagem (EMF) na lista suspensa do item. E o intervalo de dados será inserido na planilha como uma imagem, veja as capturas de tela:

Normalmente, no Excel, você pode criar um intervalo nomeado dinâmico e, em seguida, usar a imagem vinculada para resolver essa tarefa no Excel.

1. Primeiro, você deve criar duas colunas que contêm os nomes dos produtos e imagens relativas, veja a captura de tela:

2. Em seguida, crie uma lista suspensa para os valores das células. Clique em uma célula para obter a lista suspensa e clique em Data > Validação de dados > Validação de dados, veja a captura de tela:

3. No estalou para fora Validação de dados caixa de diálogo, sob o Configurações guia, escolha Lista do Permitir suspenso e, em seguida, selecione as células que deseja criar na lista suspensa do fonte caixa de texto, veja a captura de tela:

4. Clique OK, e a lista suspensa com os valores das células foi criada, selecione um item da lista suspensa, consulte a captura de tela:

5. Então clique Fórmulas > Definir o Nome, veja a captura de tela:

6. No Novo nome caixa de diálogo, execute as seguintes operações:

• Insira um nome chamado myimage no Nome caixa de texto;
• Em seguida, copie e cole esta fórmula: =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) na caixa de texto Refere-se a.

Note: Na fórmula acima:

• Folha11! $ A $ 2: $ B $ 6: é a planilha e o intervalo que contém os valores e imagens que deseja usar;
• Folha11! $ E $ 2: é a célula da planilha onde você criou a lista suspensa;
• Folha11! $ A $ 2: $ A $ 6: é a lista de células em que você criou a lista suspensa;
• O número da variável 2 é o número da coluna que contém as imagens. Se suas imagens estiverem na coluna C, você deve inserir 3.

7. E então, clique OK botão, em seguida, copie e cole a imagem correspondente com base no valor da célula em E2 do intervalo original para a célula F2, consulte a captura de tela:

8. A seguir, selecione a imagem na célula F2 e, a seguir, insira esta fórmula = minha imagem (minha imagem é o nome do intervalo que você criou na etapa 6) na barra de fórmulas, consulte a captura de tela:

9. Depois de inserir a fórmula, pressione Entrar e agora, quando você escolher um item da lista suspensa, sua imagem relativa será exibida imediatamente. Veja a imagem:

O método acima pode ser difícil para a maioria de nós, aqui, vou apresentar um recurso útil - Lista suspensa de imagens of Kutools for Excel, com esta ferramenta útil, você pode criar várias listas suspensas com suas imagens relativas com apenas alguns cliques.

Depois de instalar Kutools for Excel, execute as seguintes etapas:

1. Primeiro, você deve criar duas colunas que contêm os nomes dos produtos e imagens relativas em sua planilha.

2. E então, clique Kutools > Lista suspensa > Lista suspensa de imagens, veja a captura de tela:

3. No Lista suspensa de imagens caixa de diálogo, se você criou as colunas de valores de células e imagens, ignore a etapa 1, em seguida, selecione os dados originais e o intervalo da imagem e o intervalo de saída, consulte a captura de tela:

4. E então, clique Ok botão, as listas suspensas com imagens foram criadas nas células selecionadas, e ao selecionar um item da célula suspensa, sua imagem correspondente será exibida de uma vez, veja a demonstração abaixo:

Normalmente, você pode usar o Salvar como recurso para salvar todas as imagens da pasta de trabalho, faça o seguinte:

1. Clique Envie o > Salvar como, Na Salvar como janela, especifique uma pasta para colocar os arquivos exportados e, em seguida, escolha Página da web (*. Htm; *. Html) do Salvar como lista suspensa de tipo, veja a captura de tela:

2. E, em seguida, clique em Salvar botão, vá para a pasta específica, você verá dois arquivos, um é o arquivo de formato HTML e outro é uma pasta que contém as imagens, gráficos ou outros objetos da pasta de trabalho. Veja a imagem:

3. Em seguida, você pode arrastar apenas as imagens para outra pasta conforme necessário.

Note: Usando este Salvar como , você obterá cada imagem duas vezes, uma é menor, a outra é maior, para que você possa salvar as imagens de resolução mais alta conforme necessário.

Para salvar todas as imagens do arquivo Excel, você também pode alterar a extensão do arquivo para RAR. Por favor, faça o seguinte:

1. Alterar a extensão do arquivo XLSX para raro como a imagem abaixo mostrada:

2. Em seguida, descompacte o arquivo e você verá 3 pastas e 1 arquivo na pasta, veja a captura de tela:

3. Em seguida, clique para abrir o xl pasta e, em seguida, abra a imprensa pasta, você verá que todas as imagens estão armazenadas aqui, sem duplicatas, consulte a captura de tela:

Se você tem Kutools for Excel, Com o seu Exportar Gráficos recurso, você pode exportar rapidamente alguns objetos específicos, como imagens, gráficos, formas para o formato de imagem que você precisa.

Depois de instalar Kutools for Excel, execute as seguintes etapas:

1. Clique Kutools Plus > Importar e Exportar > Exportar Gráficos, veja a captura de tela:

2. No Exportar Gráficos caixa de diálogo, faça as seguintes operações:

• Escolha Fotografias opção do Tipos lista suspensa;
• Especifique uma pasta para salvar suas imagens de exportação;
• Em seguida, clique na lista suspensa do Formato de exportação para escolher um formato para suas fotos.
• 

3. Finalmente, clique em Ok botão, todas as imagens na pasta de trabalho atual foram salvas na pasta que você especificou, consulte a captura de tela:

Para excluir as imagens da planilha atual, o código VBA abaixo pode ajudá-lo, faça o seguinte:

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

2. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

3. Clique inserção > Móduloe cole a macro a seguir no Módulo Janela.

Código VBA: Exclua 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. Então aperte F5 para executar este código, e todas as imagens na planilha ativa são excluídas de uma vez.

Se você precisar excluir as imagens de apenas um intervalo de células, aqui está outro código simples que pode ajudá-lo.

1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe cole a macro a seguir no Módulo Janela.

Código VBA: exclua as 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

Note: No código acima, B4: C6 é o intervalo do qual você deseja excluir as fotos.

3. Então aperte F5 para executar este código, e as imagens no intervalo selecionado serão excluídas de uma vez, veja as capturas de tela:

Se você tem Kutools for Excel, Com o seu Excluir Ilustrações e Objetos recurso, você pode excluir rapidamente as imagens de uma planilha, algumas planilhas selecionadas ou pasta de trabalho inteira.

Depois de instalar Kutools for Excel, execute as seguintes etapas:

1. Clique Kutools > Apagar > Excluir Ilustrações e Objetos, veja a captura de tela:

2. No aberto Excluir Ilustrações e Objetos caixa de diálogo, verifique Fotografias do Apagar seção e, em seguida, especifique o escopo do qual deseja excluir as imagens sob o olhar dentro seção, veja a captura de tela:

3. Então clique Ok botão, e todas as imagens serão excluídas da planilha, planilhas selecionadas ou pasta de trabalho inteira conforme você especificou.