Como excluir todas as imagens em um intervalo de células?

Se houver várias imagens inseridas na sua planilha e você deseja excluir algumas delas em um intervalo específico, como resolver isso rapidamente?

Excluir todas as imagens em um intervalo específico de células com código VBA

Excluir todas as imagens em uma planilha ou pasta de trabalho inteira com Kutools para Excel

Excluir todas as imagens em um intervalo específico de células com código VBA

Aqui está um código VBA simples que pode ajudá-lo a excluir as imagens no intervalo selecionado sem precisar excluí-las uma por uma. Por favor, siga estas instruções:

1. Pressione e segure as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo, e cole o seguinte código na Janela do Módulo.

Código VBA: excluir todas as imagens em um intervalo de células selecionado:

Sub DeletePic()
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("A5:B8")
    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, A5:B8 é o intervalo do qual você deseja excluir as imagens; altere-o conforme necessário.

3. Em seguida, pressione a tecla F5 para executar este código, e as imagens no intervalo selecionado serão excluídas imediatamente, veja a captura de tela:

Excluir todas as imagens em uma planilha ou pasta de trabalho inteira com Kutools para Excel

Se você precisa excluir todas as imagens de uma planilha ou pasta de trabalho, o utilitário Excluir Ilustrações & Objetos do Kutools para Excel pode ajudá-lo.

Após instalar o Kutools para Excel, siga os passos abaixo:

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

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

3. Em seguida, clique no botão Ok, e todas as imagens serão excluídas da planilha ou da pasta de trabalho inteira conforme selecionado.