Come eliminare tutto tranne gli intervalli selezionati in Excel?

In Excel, possiamo eliminare rapidamente e direttamente gli intervalli selezionati, ma avete mai provato a eliminare il contenuto di altre celle tranne gli intervalli selezionati? In questo articolo, vi presenterò alcuni trucchi per risolvere questa operazione in Excel in modo rapido e semplice.

Elimina tutto tranne gli intervalli selezionati con il codice VBA

Elimina tutto tranne gli intervalli selezionati con Assistente intervallo di Kutools per Excel

Elimina tutto tranne gli intervalli selezionati con Copia intervalli di Kutools per Excel

Elimina tutto tranne gli intervalli selezionati con il codice VBA

Non esiste un modo diretto per eliminare tutti i valori delle celle non selezionate in una volta sola, ma il seguente codice VBA potrebbe aiutarvi, procedete come segue:

1. Tenete premuto il tasto Ctrl per selezionare le celle che desiderate mantenere.

2. Premete contemporaneamente i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Application.

3. Nella finestra di dialogo Microsoft Visual Basic for Application, cliccate su Inserisci > Modulo, quindi copiate e incollate il seguente codice VBA nella finestra Modulo.

Codice VBA: elimina tutti i valori delle celle tranne gli intervalli selezionati

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. Quindi premete il tasto F5 per eseguire questo codice, e apparirà una finestra di promemoria che vi chiederà di selezionare l'intervallo di celle che desiderate mantenere; se avete già selezionato gli intervalli nel passaggio 1, cliccate OK, altrimenti potete selezionare le celle desiderate nella finestra di promemoria e inserire le virgole per separare più intervalli, quindi cliccate sul pulsante OK, vedere screenshot:

5. Dopo aver cliccato su OK, tutti gli altri valori delle celle saranno stati eliminati lasciando solo gli intervalli selezionati, vedere screenshot:

Elimina tutto tranne gli intervalli selezionati con Assistente intervallo di Kutools per Excel

Se avete installato Kutools per Excel, con la funzione Complemento dell'utilità Assistente intervallo, potete invertire rapidamente la selezione e quindi eliminare le selezioni invertite in una volta sola.

Dopo aver installato Kutools per Excel, procedete come segue:

1. Selezionate gli intervalli di celle che desiderate mantenere.

2. Quindi cliccate su Kutools > Seleziona > Assistente intervallo, vedere screenshot:

3. Nella finestra di dialogo Assistente intervallo, selezionate Complemento, vedere screenshot:

4. Successivamente, trascinate il mouse per selezionare l'intervallo che desiderate invertire. Quando rilasciate il mouse, le celle selezionate verranno deselezionate e le celle non selezionate verranno selezionate immediatamente. Vedere screenshot:

5. Quindi chiudete la finestra di dialogo e premete il tasto Elimina per eliminare le selezioni in una volta sola. Solo le celle desiderate rimarranno, vedere screenshot:

Elimina tutto tranne gli intervalli selezionati con Assistente intervallo di Kutools per Excel

Un'altra utilità - Copia intervalli di Kutools per Excel può anche aiutarvi a completare questa operazione, basta copiare gli intervalli selezionati in un nuovo foglio di lavoro e poi eliminare il vecchio foglio di lavoro.

Dopo aver installato Kutools per Excel, procedete con i seguenti passaggi:

1. Tenete premuto il tasto Ctrl per selezionare gli intervalli di celle che desiderate mantenere.

2. Quindi cliccate su Kutools > Copia intervalli, vedere screenshot:

3. E nella finestra di dialogo Copia intervalli multipli, selezionate l'opzione Tutti sotto Incolla speciale, selezionate Includi altezza riga e Includi larghezza colonna se desiderate mantenere l'altezza delle righe e la larghezza delle colonne che volete, vedere screenshot:

4. Quindi cliccate sul pulsante Ok, e apparirà un'altra finestra di promemoria per ricordarvi di selezionare una cella dove posizionare le celle copiate, selezionate una cella in un nuovo foglio di lavoro, vedere screenshot:

5. Quindi cliccate su OK, e solo gli intervalli selezionati verranno incollati nel nuovo foglio di lavoro, e ora potete eliminare il foglio di lavoro originale secondo necessità.

Demo: Elimina tutto tranne gli intervalli selezionati con Kutools per Excel