Hur hittar man det vanligaste värdet (nummer eller textsträng) från en lista i Excel?

Generellt kan vi använda LÄGE fungera (=LÄGE(A1:A16)) för att hitta det vanligaste numret från ett intervall. Men den här MODE-funktionen fungerar inte med textsträngar. För att extrahera det mest förekommande värdet kan du använda följande matrisformel. Gör så här:

I en tom cell förutom data anger du formeln nedan och trycker på Skift + Ctrl + Enter nycklar tillsammans.

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

Formel är för komplicerad för att komma ihåg? Spara formeln som en automatisk textpost för återanvändning med bara ett klick i framtiden! Läs mer ...     fri rättegång

Om du har Kutools för Excel installerat kan du enkelt använda det Hitta det mest kommavärdet formel för att snabbt få det vanligaste värdet från en lista eller kolumn i Excel.

1. Välj en tom cell som du placerar det hittade värdet i och klicka på Kutools > Formel Helper> Formel Helper.

2. Välj i dialogrutan Formula Helper Lookup från Formel typ rullgardinsmeny, klicka för att välja Hitta det vanligaste värdet i Välj en formel i listrutan, ange listan / kolumnen i Mätområde rutan och klicka på Ok knapp. Se skärmdump:

Och då ser du att det vanligaste / frekventaste värdet har hittats och placerats i den valda cellen. Se skärmdump:

Med följande VBA-kod kan du inte bara hitta det mest förekommande värdet utan också räkna antalet gånger för det vanligaste ordet.

1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic for Applications-fönstret.

2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.

VBA-kod: Hitta det vanligaste värdet från en lista

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. Tryck sedan på F5 för att köra den här koden och en snabbruta dyker upp för att påminna dig om att välja det intervall som du vill använda. Se skärmdump:

4. Och klicka sedan på OKfår du en snabbruta som visar följande information: