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

Come si fa a classificare i dati in ordine inverso in Excel?

AutoreSun Data di modifica

In Excel, la formula tipica =RANK(cella; intervallo) classifica i dati assegnando il rango 1 al valore più alto e il rango più basso al valore minimo. Tuttavia, in alcuni casi potrebbe essere necessario invertire questa logica: assegnare il rango migliore (1) al valore più piccolo e l’ultimo rango al valore più grande, come mostrato nello screenshot seguente. Questo approccio è particolarmente utile quando si analizzano dati in cui valori inferiori indicano prestazioni migliori, ad esempio tempi di gara, costi o conteggi di errori.
Uno screenshot che mostra i dati ordinati in ordine inverso in Excel

Classifica i dati in ordine inverso|Codice VBA: Assegna automaticamente i ranghi inversi


Classifica i dati in ordine inverso

Per creare una classifica inversa in Excel, basta modificare leggermente la formula standard RANK aggiungendo un argomento specifico. In questo modo, puoi classificare i dati facilmente dal più piccolo al più grande, invece che nell’ordine predefinito.

Selezionare una cella vuota in cui si desidera visualizzare il risultato della classifica inversa. Supponendo che l’intervallo dati si trovi nelle celle da B2 a B10, inserire la seguente formula nella prima cella adiacente ai dati (ad esempio, in C2):

=RANK(B2,$B$2:$B$10,1)

Dopo aver inserito la formula, premere Invio. Per applicarla alle altre celle della colonna, usa il quadratino di riempimento: posiziona il cursore nell’angolo in basso a destra della cella con la formula (C2) e, non appena il puntatore si trasforma in un segno più, trascinalo verso il basso fino a coprire tutte le celle corrispondenti ai dati (fino a C10 in questo esempio).
Uno screenshot della formula per il rango inverso applicata in Excel

Se l’intervallo dati è diverso, basta adeguare i riferimenti di cella nella formula in base ai propri dati effettivi. Ricorda che, in presenza di valori duplicati, la funzione RANK assegnerà lo stesso rango a tali valori e i ranghi successivi verranno saltati (ad esempio, se due elementi sono a pari merito al secondo posto, il rango successivo sarà il quarto).

La classifica inversa è particolarmente utile per mettere in risalto i valori più bassi o i tempi più rapidi e si adatta perfettamente a set di dati in cui i pareggi sono accettabili o previsti.


Codice VBA: Assegna automaticamente i ranghi inversi

Per set di dati più grandi o scenari in cui i dati vengono aggiornati frequentemente e si richiede una soluzione più automatizzata, è possibile utilizzare codice VBA per assegnare ranghi inversi in modo rapido ed efficace. Questo metodo è ideale per utenti a proprio agio con la programmazione di base e desiderosi di eliminare passaggi manuali ripetitivi.

1. Apri l’editor VBA facendo clic su Strumenti per sviluppatori > Visual Basic. Nella finestra di Visual Basic, fai clic su Inserisci > Modulo e incolla il seguente codice nel riquadro Modulo:

Sub AssignReverseRank()
    Dim dataRange As Range
    Dim outputRange As Range
    Dim i As Long
    Dim j As Long
    Dim temp As Variant
    Dim arr As Variant
    Dim sortedArr As Variant
    Dim rankArr() As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set dataRange = Application.InputBox("Select the data range to rank (single column):", xTitleId, "", Type:=8)
    If dataRange Is Nothing Then Exit Sub
    
    Set outputRange = Application.InputBox("Select the first cell for output ranks:", xTitleId, "", Type:=8)
    If outputRange Is Nothing Then Exit Sub
    
    arr = dataRange.Value
    ReDim rankArr(1 To UBound(arr, 1), 1 To 1)
    sortedArr = arr
    
    ' Sort the array in ascending order
    For i = 1 To UBound(sortedArr, 1) - 1
        For j = i + 1 To UBound(sortedArr, 1)
            If sortedArr(i, 1) > sortedArr(j, 1) Then
                temp = sortedArr(i, 1)
                sortedArr(i, 1) = sortedArr(j, 1)
                sortedArr(j, 1) = temp
            End If
        Next j
    Next i
    
    ' Assign reverse ranks
    For i = 1 To UBound(arr, 1)
        For j = 1 To UBound(sortedArr, 1)
            If arr(i, 1) = sortedArr(j, 1) Then
                rankArr(i, 1) = j
                Exit For
            End If
        Next j
    Next i
    
    outputRange.Resize(UBound(rankArr, 1), 1).Value = rankArr
End Sub

2. Per eseguire la macro, fai clic sul pulsante Pulsante EseguiEsegui oppure premi F5. Ti verrà chiesto di selezionare l’intervallo dati (scegli una singola colonna da ordinare in ordine inverso) e poi la prima cella in cui desideri visualizzare i risultati della classifica. Clicca su OK dopo ogni selezione.

Questa macro ordina i dati in ordine crescente e assegna automaticamente i ranghi inversi, attribuendo il rango 1 al valore più piccolo. È ideale per classificare migliaia di voci in un’unica operazione o per automatizzare le classifiche in report aggiornati regolarmente.

Quando si utilizza questa macro, assicurarsi che i dati siano contigui e composti esclusivamente da valori numerici. Celle non numeriche o vuote potrebbero infatti generare risultati errati, quindi è consigliabile pulire preventivamente i dati. Inoltre, salvare la cartella di lavoro prima di eseguire la macro rappresenta una precauzione essenziale per evitare modifiche indesiderate.


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