Come eliminare i valori unici da una colonna in Excel?

Di solito, la maggior parte di noi vuole rimuovere i valori duplicati da una colonna, ma a volte potresti voler rimuovere i valori unici che compaiono solo una volta nella colonna. Questo tutorial parla di alcuni trucchi per aiutarti a rimuovere solo i valori unici da una colonna in Excel.

Elimina valori unici con VBA in Excel

Elimina valori unici con Kutools per Excel

---

Elimina valori unici con VBA in Excel

Utilizzando VBA, puoi eliminare rapidamente tutti i valori unici da una colonna.

1. Premi Alt + F11 per visualizzare la finestra Microsoft Visual Basic for Applications.

2. Nella finestra, clicca Inserisci > Modulo per aprire una nuova finestra del modulo, quindi copia il seguente codice VBA nella finestra del modulo.

VBA: Elimina valori unici da una colonna.

Sub DeleteUnique()
'Updateby20140617
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
Dim Dic As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.Columns(1)
Set Dic = CreateObject("Scripting.Dictionary")
Arr = WorkRng.Value
For i = 1 To UBound(Arr, 1)
    xValue = Arr(i, 1)
    Dic(xValue) = Dic(xValue) + 1
Next
WorkRng.ClearContents
Arr = WorkRng.Value
xIndex = 1
For Each xKey In Dic.keys
    xValue = Dic(xKey)
    If xValue > 1 Then
        For i = 1 To xValue
            Arr(xIndex, 1) = xKey
            xIndex = xIndex + 1
        Next
    End If
Next
WorkRng.Value = Arr
End Sub

3. Clicca Esegui per eseguire il codice VBA, e una KutoolsforExcel finestra di dialogo si aprirà per selezionare un intervallo su cui lavorare. Vedi screenshot:

4. Clicca OK, e tutti i valori unici verranno eliminati.

---

Elimina valori unici con Kutools per Excel

Se non sei familiare con VBA, puoi considerare di utilizzare la funzione Seleziona celle duplicate e uniche di Kutools per Excel per rimuovere i valori unici in Excel.

Kutools per Excel include più di 300 strumenti utili per Excel. Provalo gratuitamente senza limitazioni per 30 giorni. Ottienilo ora

1. Seleziona la colonna da cui vuoi eliminare i valori unici, e clicca su Kutools > Seleziona > Seleziona celle duplicate e uniche. Vedi screenshot:

2. Nella finestra di dialogo che appare, seleziona Valori unici e clicca Ok, quindi esci dalla finestra di dialogo. Vedi screenshot:

3. A questo punto, tutti i valori che appaiono una sola volta saranno stati selezionati. Fai clic con il tasto destro e scegli Elimina dal menu contestuale. Vedi screenshot:

4. Nella finestra di dialogo Elimina, seleziona Riga intera e clicca OK. Vedi screenshot:

Ora puoi vedere che i valori unici sono stati rimossi.

Suggerimento: se vuoi solo rimuovere il contenuto delle celle, puoi fare clic su Cancella contenuto dal menu contestuale al passaggio 3.

Puoi cliccare qui per saperne di più sulla funzione Seleziona celle duplicate e uniche.

---

Articoli correlati:

• Elimina tutti i commenti in Excel
• Rimuovi righe duplicate in Excel

---