Como excluir tudo exceto os intervalos selecionados no Excel?

No Excel, podemos excluir rapidamente e diretamente os intervalos selecionados, mas você já tentou excluir o conteúdo de outras células, exceto os intervalos selecionados? Neste artigo, vou apresentar alguns truques para ajudá-lo a resolver essa tarefa no Excel de forma rápida e fácil.

Excluir tudo exceto os intervalos selecionados com código VBA

Excluir tudo exceto os intervalos selecionados com o Assistente de Intervalo do Kutools para Excel

Excluir tudo exceto os intervalos selecionados com Copiar Faixas do Kutools para Excel

Excluir tudo exceto os intervalos selecionados com código VBA

Não há uma maneira direta de excluir todos os valores das células não selecionadas de uma só vez, mas o seguinte código VBA pode ajudá-lo, por favor, siga as instruções abaixo:

1. Por favor, mantenha a tecla Ctrl pressionada para selecionar as células que deseja manter.

2. Pressione simultaneamente as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

3. Na caixa de diálogo Microsoft Visual Basic for Applications, clique em Inserir > Módulo, depois copie e cole o código VBA abaixo na janela Módulo.

Código VBA: excluir todos os valores das células exceto os intervalos selecionados

Sub ClearAllExceptSelection()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    Dim xUpdate As Boolean
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the ranges want to keep", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xUpdate = Application.ScreenUpdating
    Application.ScreenUpdating = False
    For Each xCell In ActiveSheet.UsedRange
        If Intersect(xCell, xRg) Is Nothing Then
            xCell.Clear
        End If
    Next
    Application.ScreenUpdating = xUpdate
End Sub

4. Em seguida, pressione a tecla F5 para executar este código, e uma caixa de aviso será exibida para lembrá-lo de selecionar o intervalo de células que deseja manter; se você já selecionou os intervalos na etapa 1, clique em OK; caso contrário, você pode selecionar as células desejadas na caixa de aviso e inserir vírgulas para separar múltiplos intervalos, depois clique em OK, veja a captura de tela:

5. Após clicar em OK, todos os outros valores das células serão excluídos, deixando apenas os intervalos selecionados, veja a captura de tela:

Excluir tudo exceto os intervalos selecionados com o Assistente de Intervalo do Kutools para Excel

Se você instalou o Kutools para Excel, com o recurso Complemento da ferramenta Assistente de Intervalo, você pode inverter rapidamente a seleção e, em seguida, excluir as seleções invertidas de uma só vez.

Após instalar o Kutools para Excel, por favor, faça o seguinte:

1. Selecione os intervalos de células que deseja manter.

2. Em seguida, clique em Kutools > Selecionar > Assistente de Intervalo, veja a captura de tela:

3. Na caixa de diálogo Assistente de Intervalo, marque Complemento, veja a captura de tela:

4. E então arraste o mouse para selecionar o intervalo onde deseja inverter as seleções. Quando soltar o mouse, as células selecionadas terão sido desmarcadas e as células não selecionadas terão sido selecionadas imediatamente. Veja a captura de tela:

5. Em seguida, feche a caixa de diálogo e pressione a tecla Delete para excluir as seleções de uma só vez. E somente suas células desejadas terão sido mantidas, veja a captura de tela:

Excluir tudo exceto os intervalos selecionados com o Assistente de Intervalo do Kutools para Excel

Outra ferramenta - Copiar Faixas do Kutools para Excel também pode ajudá-lo a concluir esta tarefa; basta copiar seus intervalos selecionados para uma nova planilha e, em seguida, excluir a planilha antiga.

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

1. Mantenha a tecla Ctrl pressionada para selecionar os intervalos de células que deseja manter.

2. Em seguida, clique em Kutools > Copiar Faixas, veja a captura de tela:

3. E na caixa de diálogo Copiar Múltiplas Faixas, marque a opção Tudo em Colar Especial, marque Incluir Altura da Linha e Incluir Largura da Coluna se desejar manter a altura da linha e largura da coluna que você quer, veja a captura de tela:

4. Em seguida, clique no botão Ok, e outra caixa de aviso aparecerá para lembrá-lo de selecionar uma célula para colocar as células copiadas; por favor, selecione uma célula em uma nova planilha, veja a captura de tela:

5. E então clique em OK, e somente seus intervalos selecionados terão sido colados na nova planilha, e agora você pode excluir a planilha original conforme necessário.

Demonstração: Excluir tudo exceto os intervalos selecionados com o Kutools para Excel