KutoolsforOffice — Un'unica soluzione, cinque potenti strumenti.Ottenere di più con meno sforzo.

Come rimuovere le righe duplicate mantenendo solo quella con la data più recente in Excel?

AutoreXiaoyang Data di modifica
Uno screenshot di dati con duplicati e date in Excel

Ho un intervallo di dati con alcuni valori duplicati nella colonna A e date corrispondenti nella colonna B. Come posso rimuovere rapidamente e facilmente le righe duplicate in colonna A mantenendo solo quella con la data più recente in colonna B, come mostrato nello screenshot seguente?

Rimuovi i Valori duplicati e mantieni la data più recente in un'altra colonna con codice VBA

Rimuovi i Valori duplicati e mantieni la data più recente in un'altra colonna con Kutools per Excel


Rimuovi i Valori duplicati e mantieni la data più recente in un'altra colonna con codice VBA

Il seguente codice VBA ti permette di rimuovere le celle duplicate mantenendo la data più recente presente in un’altra colonna. Procedi nel modo seguente:

1. Tieni premuti i tasti ALT + F11: si aprirà la finestra di Microsoft Visual Basic for Applications.

2. Fai clic su Inserisci > Modulo, quindi incolla la seguente macro nella finestra del Modulo.

Codice VBA: Rimuovi i Valori duplicati e mantieni la data più recente

Sub test()
'updateby Extendoffice 
    Dim xRng As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = Application.ActiveWindow.RangeSelection.Address
    Set xRng = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRng Is Nothing Then Exit Sub
    If (xRng.Columns.Count < 2) Or (xRng.Rows.Count < 2) Then
        MsgBox "the used range is invalid", , "Kutools for Excel"
        Exit Sub
    End If
    xRng.Sort key1:=xRng.Cells(1, 1), Order1:=xlAscending, key2:=xRng.Cells(1, 2), Order2:=xlDescending, Header:=xlGuess
    xRng.RemoveDuplicates Columns:=1, Header:=xlGuess
End Sub

3. Premi quindi il tasto F5 per eseguire questo codice. Apparirà una finestra di avviso che ti chiederà di selezionare l’intervallo dati da utilizzare; vedi lo screenshot:

Uno screenshot della selezione di un intervallo di dati per rimuovere i duplicati e mantenere la data più recente

4. Fai quindi clic su OK: i valori duplicati nella colonna A sono stati rimossi e la data più recente nella colonna B è stata mantenuta come richiesto. Vedi lo screenshot:

Uno screenshot di Excel dopo aver rimosso i duplicati e mantenuto l'ultima data utilizzando VBA

Nota: per applicare correttamente il codice indicato, la colonna con i valori duplicati deve trovarsi a sinistra di quella delle date.


Rimuovi i Valori duplicati e mantieni la data più recente in un'altra colonna con Kutools per Excel

Se non hai dimestichezza con il codice, non preoccuparti: la potente utility Unione avanzata righe di Kutools per Excel ti permette di completare questa operazione in tutta semplicità.

Kutools per Exceloffre oltre 300 funzionalità avanzate per semplificare attività complesse, aumentando creatività ed efficienza.Integrato con funzionalità basate sull’IA, Kutools automatizza le attività con precisione, rendendo la gestione dei dati semplice e immediata.Informazioni dettagliate su Kutools per Excel...         Prova gratuita...

Dopo aver installato Kutools per Excel, procedi come segue:

1. Seleziona l’intervallo di dati da cui desideri rimuovere i duplicati e mantenere la data più recente presente in un’altra colonna.

2.Fai quindi clic su Kutools>Unisci e Dividi>Unione avanzata righe, vedi lo screenshot:

Uno screenshot della selezione dell'opzione Combina Righe Avanzate nella scheda Kutools sulla barra multifunzione

3. Nella finestra di dialogo Combinare righe in base alla colonna, fai clic sul nome della colonna da cui desideri rimuovere i valori duplicati, quindi seleziona Chiave primaria. Vedi lo screenshot:

Uno screenshot dell'impostazione della chiave primaria nella finestra di dialogo Combina Righe in Base a Colonna

4. Fai clic su un’altra colonna di cui desideri mantenere la data più recente, quindi seleziona Calcola > Max. Vedi lo screenshot:

Uno screenshot della selezione della funzione Max per mantenere la data più recente

5. Fai quindi clic sul pulsante Ok per chiudere questa finestra di dialogo. Ora puoi vedere che i nomi duplicati nella colonna A sono stati rimossi e viene mantenuta solo la data più recente nella corrispondente colonna B. Vedi lo screenshot:

Uno screenshot del risultato finale dopo aver rimosso i duplicati e mantenuto la data più recente in Excel

Kutools per Excel– Potenzia Excel con oltre 300 strumenti essenziali, rendendo il tuo lavoro più veloce e semplice, e sfrutta le funzionalità basate sull’IA per un’elaborazione dati più intelligente e una maggiore produttività.Scaricalo ora


Demo: Rimuovi i Valori duplicati e mantieni la data più recente in un'altra colonna con Kutools per Excel

Kutools per Excel: Oltre 300 strumenti pratici a portata di mano! Goditi funzionalità basate sull’intelligenza artificiale per lavorare in modo più intelligente e veloce!Scarica ora!

Migliori Strumenti per la Produttività in Office

🤖KUTOOLS AI Assistente: Rivoluziona Analisi dei dati in base a:Esecuzione Intelligente   |  Genera Codice|  Crea formule personalizzate  |  Analizza Dati e Genera Grafici|  Richiama Funzioni avanzate
Funzionalità Popolari:Trova, Evidenzia o Contrassegna Duplicati   |  Elimina righe vuote   |  Combinare Colonne o Celle senza Perdere Dati   |   Arrotondamento senza usare la formula...
Super RICERCA.VERT:VLookup con Criteri Multipli  |  VLookup con Valori Multipli  |   VLookup tra Fogli Multipli   |   Corrispondenza approssimativa....
Elenco a discesa avanzato:Crea Rapidamente un Elenco a Discesa   |  Elenco a Discesa Dipendente   |  Elenco a Discesa con Selezione Multipla....
Gestione Colonne:Aggiungi un Numero Specifico di Colonne|Sposta Colonne|Attiva/Disattiva lo Stato di Visibilità delle Colonne Nascoste|Confronta Intervalli e Colonne...
Funzionalità in Evidenza:Attenzione della griglia   |  Visualizzazione Design   |Barra delle formule avanzata   | Gestione Cartelle di Lavoro e Fogli   |  Biblioteca di risorse(Testo Automatico)|  Selettore di Date   |  Unisci fogli di lavoro  |  Crittografa/Decrittografa celle   | Invia Email da Lista   |  Super Filtri   |   Filtro speciale(Filtra celle con testo in grassetto/corsivo/barrato...) ...
Principali Set di Strumenti 15:12 Strumentiper il Testo(Aggiungi testo,Elimina Caratteri Specifici, ...)|   50+Tipidi Grafico(Diagramma di Gantt, ...)|   40+ Formule Pratiche(Calcola l'età in base alla data di nascita, ...)|   19 Strumentidi Inserimento(Inserisci Codice QR,Inserisci Immagine dal Percorso, ...)|   12 Strumentidi Conversione(Converti in parole,Conversione del tasso di cambio, ...)|   7 StrumentiUnisci e Dividi(Unione avanzata righe,Dividi celle, ...)|... e molto altro
Usa Kutools nella tua lingua preferita – supporta inglese, spagnolo, tedesco, francese, cinese e 40+ altre!

Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...


Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
  • Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!

Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.

Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.

ExcelWordOutlookTabsPowerPoint
  • Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
  • Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
  • Funziona meglio insieme— produttività ottimizzata tra le app di Office
  • Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
  • Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi