RemoveDuplicates in VBA Excel
I valori duplicati spesso non sono richiesti in Excel, soprattutto quando si desidera contare i valori univoci. Di solito abbiamo un diverso set di dati con cui lavorare e vediamo un mucchio di valori duplicati in esso.
Spero che tu abbia familiarità con la rimozione dei duplicati nel foglio di lavoro Excel, se non nulla di cui preoccuparsi. Ti mostreremo un semplice esempio per te. Anche in VBA possiamo eseguire il metodo di rimozione dei duplicati.
Quindi, ha rimosso tutti i valori duplicati dell'intestazione "Regione". Allo stesso modo, possiamo svolgere questa attività con l'aiuto del codice VBA.
Come rimuovere i valori duplicati nella codifica VBA?
Per rimuovere prima i valori duplicati, dobbiamo menzionare l'intervallo a cui ci riferiamo. Quindi possiamo accedere al metodo "Rimuovi duplicati". Quindi la sintassi sarà la seguente.
(Colonna): quale colonna della selezione dobbiamo rimuovere i duplicati? Dobbiamo menzionare il numero di colonna dell'intervallo selezionato.
(Intestazione): l'intervallo selezionato ha o meno intestazioni. Abbiamo tre opzioni con cui lavorare qui.
- xl Sì: se i dati hanno intestazioni, puoi selezionarlo.
- xlNo: se i dati non hanno intestazioni, puoi selezionarlo.
- xlGuess: questa opzione consentirà a Excel di indovinare le intestazioni dei dati.
Quindi, utilizzando questi parametri, possiamo rimuovere i duplicati con un semplice clic di un pulsante senza sudare.
Nella sezione seguente, ti mostrerò alcuni degli esempi per rimuovere i duplicati da VBA. Segui attentamente i passaggi per scrivere il codice da solo.
Esempi di rimozione dei valori duplicati nella codifica VBA
Di seguito sono riportati gli esempi di Remove Duplicate in Values VBA.
VBA Rimuovi duplicati - Esempio n. 1
Considera i dati seguenti anche per questo esempio.
Dai dati precedenti, dobbiamo rimuovere i duplicati della colonna "Regione", quindi segui i passaggi seguenti per scrivere il codice.
Passaggio 1: avviare la sottoprocedura assegnando un nome a un codice macro.
Passaggio 2: menzionare l'intervallo di dati utilizzando l' oggetto Intervallo VBA .
Codice:
Sub Remove_Duplicates_Example1 () Intervallo ("A1: C9"). End Sub
Passaggio 3: dopo aver menzionato il metodo VBA " RemoveDuplicates " di accesso all'intervallo .
Codice:
Sub Remove_Duplicates_Example1 () Intervallo ("A1: C9"). RemoveDuplicates End Sub
Passaggio 4: primo argomento in quale colonna dobbiamo rimuovere i valori duplicati. In questo esempio, dalla prima colonna, dobbiamo rimuovere i duplicati.
Codice:
Sub Remove_Duplicates_Example1 () Intervallo ("A1: C9"). RemoveDuplicates Columns: = 1, End Sub
Passaggio 5: la prossima cosa è se i dati hanno intestazioni o meno. In questo caso, abbiamo le intestazioni, quindi seleziona "xlYes".
Codice:
Sub Remove_Duplicates_Example1 () Intervallo ("A1: C9"). RemoveDuplicates Columns: = 1, Header: = xlYes End Sub
Esegui questo codice. VBA rimuoverà i duplicati dalla regione selezionata.
Questo è un modo esplicito di riferirsi all'intervallo di celle. Se desideri selezionare l'intervallo da solo e quindi rimuovere i duplicati, dobbiamo utilizzare la variabile con cui lavorare. Nell'esempio seguente, ti mostrerò come utilizzare le variabili in VBA.
VBA Rimuovi duplicati - Esempio # 2
Nell'esempio precedente, abbiamo fornito specificamente l'intervallo di celle. Ora vedremo come lavorare con la selezione delle nostre celle.
Ad esempio, ho alcuni set di dati, come mostrato nell'immagine sottostante.
Ogni volta che non riesco a specificare l'intervallo di celle in modo esplicito, quindi assegneremo la selezione come intervallo.
Passaggio 1: dichiara la variabile come intervallo .
Codice:
Sub Remove_Duplicates_Example2 () Dim Rng As Range End Sub
Passaggio 2: l' intervallo è un oggetto. Imposteremo l'intervallo come nostra selezione.
Codice:
Sub Remove_Duplicates_Example2 () Dim Rng As Range Set Rng = Selection End Sub
Passaggio 3: ora, invece di un intervallo di celle, possiamo utilizzare la variabile " rng ".
Codice:
Sub Remove_Duplicates_Example2 () Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Colonne: = 1, Header: = xlYes End Sub
Prima di eseguire il codice, dobbiamo prima selezionare l'intervallo di celle. Quindi possiamo rimuovere i duplicati dall'intervallo di celle selezionato.
VBA Rimuovi duplicati da più colonne - Esempio n. 3
Possiamo anche usare VBA per rimuovere anche i valori duplicati dalle colonne di Excel. Per rimuovere più colonne, dobbiamo usare Array e menzionare i numeri delle colonne.
Ad esempio, guarda l'immagine dei dati di esempio.
Abbiamo valori duplicati nella prima colonna e nella quarta colonna. Quindi rimuoveremo da queste colonne. Usa il codice seguente per VBA per rimuovere i duplicati.
Codice:
Sub Remove_Duplicates_Example3 () Dim Rng As Range Set Rng = Range ("A1: D9") Rng.RemoveDuplicates Colonne: = Array (1, 4), Header: = xlYes End Sub
Puoi scaricare questo VBA Rimuovi duplicati Excel qui. VBA Rimuovi duplicati modello Excel
