Généralement, nous pouvons appliquer le MODE fonction (=MODE(A1:A16)) pour trouver le nombre le plus courant dans une plage. Mais cette fonction MODE ne fonctionne pas avec des chaînes de texte. Pour extraire la valeur la plus courante, vous pouvez appliquer la formule matricielle suivante. Veuillez procéder comme suit :

Dans une cellule vide en plus des données, entrez la formule ci-dessous et appuyez sur Maj + Ctrl + Entrée clés ensemble.

=INDEX($A$1:$A$16,MODE(MATCH($A$1:$A$16,$A$1:$A$16,0)))

La formule est trop compliquée à retenir? Enregistrez la formule en tant qu'entrée de texte automatique pour la réutiliser en un seul clic à l'avenir! Lire la suite...     Essai gratuit

Si Kutools for Excel est installé, vous pouvez facilement l'appliquer Trouver la plus grande valeur de virgule formule pour obtenir rapidement la valeur la plus fréquente d'une liste ou d'une colonne dans Excel.

1. Sélectionnez une cellule vide dans laquelle placer la valeur trouvée, puis cliquez sur Kutools > Aide à la formule> Aide à la formule.

2. Dans la boîte de dialogue Aide à la formule, choisissez Lookup du Type de formule liste déroulante, cliquez pour sélectionner Trouvez la valeur la plus courante dans le Choisissez une formule list box, spécifiez la liste / colonne dans le Catégorie et cliquez sur le Ok bouton. Voir la capture d'écran:

Et puis vous verrez que la valeur la plus courante / fréquente a été trouvée et placée dans la cellule sélectionnée. Voir la capture d'écran:

Avec le code VBA suivant, vous pouvez non seulement trouver la valeur la plus courante, mais également compter le nombre de fois pour le mot le plus courant.

1. Maintenez le ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.

2Cliquez sur insérer > Moduleet collez le code suivant dans le Fenêtre du module.

Code VBA: recherchez la valeur la plus courante dans une liste

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. Puis appuyez F5 pour exécuter ce code, et une boîte de dialogue apparaîtra pour vous rappeler de sélectionner la plage que vous souhaitez utiliser. Voir la capture d'écran:

4. Et puis cliquez OK, vous obtiendrez une boîte de dialogue qui affiche les informations suivantes: