Come trovare il valore più frequente (numero o stringa di testo) in un elenco in Excel?

In genere, puoi usare la funzione MODA(=MODA(A1:A16)) per trovare il numero più frequente in un intervallo. Tuttavia, questa funzione non supporta le stringhe di testo. Per estrarre il valore che compare più frequentemente, puoi applicare la seguente formula di matrice. Procedi così:

In una cella vuota accanto ai dati, inserisci la formula seguente e premi contemporaneamente i tasti Maiusc + Ctrl + Invio.

=INDICE($A$1:$A$16;MODA(CONFRONTA($A$1:$A$16;$A$1:$A$16;0)))

La formula è troppo complicata da ricordare? Salvatala come voce di Testo automatico e riutilizzala in futuro con un solo clic!Ulteriori informazioni…     Prova gratuita

Se hai Kutools per Excel installato, puoi applicare facilmente la sua formula Trova valore più comune per ottenere in pochi istanti il valore più frequente da un elenco o da una colonna in Excel.

1. Seleziona una cella vuota in cui desideri inserire il valore trovato e fai clic su Kutools > Assistente formula > Assistente formula.

2. Nella finestra di dialogo Assistente formula, scegliere Ricerca dal menu a discesa Tipo di formula, fare clic per selezionare Trova il valore più frequente nella casella Seleziona una formula, specificare l'elenco o la colonna nella casella Intervallo, quindi fare clic sul pulsante OK. Vedere lo screenshot:

A questo punto, noterai che il valore più comune o frequente è stato individuato e inserito nella cella selezionata. Guarda lo screenshot:

Con il seguente codice VBA, puoi non solo individuare il valore che compare più frequentemente, ma anche contare quante volte appare la parola più comune.

1. Tieni premuti i tasti ALT + F11 per aprire la finestra Microsoft Visual Basic, Applications.

2. Fare clic su Inserisci > Modulo, quindi incollare il codice seguente nella finestra del modulo.

Codice VBA: Trovare il valore più comune da un elenco

Sub FindFrequency()
'Update 20140326
Dim Rng As Range
Dim WorkRng As Range
Set dic = CreateObject("scripting.dictionary")
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xMax = 0
xOutValue = ""
For Each Rng In WorkRng
    xValue = Rng.Value
    If xValue <> "" Then
        dic(xValue) = dic(xValue) + 1
        xCount = dic(xValue)
        If xCount > xMax Then
            xMax = xCount
            xOutValue = xValue
        End If
    End If
Next
MsgBox "The most common value is: " & xOutValue & " Appeared " & xMax & " Times"
End Sub

3. Premere quindi il tasto F5 per eseguire il codice. Verrà visualizzata una finestra di richiesta in cui ti verrà chiesto di selezionare l'intervallo da utilizzare. Vedere lo screenshot:

4. Fare quindi clic su OK per visualizzare una finestra di messaggio contenente le seguenti informazioni: