În general, putem aplica MODE funcţie (=MOD(A1:A16)) pentru a găsi cel mai frecvent număr dintr-un interval. Dar această funcție MODE nu funcționează cu șiruri de text. Pentru a extrage cea mai mare valoare, puteți aplica următoarea formulă matrice. Vă rugăm să faceți așa:

Într-o celulă goală pe lângă date, introduceți mai jos formula și apăsați Shift + Ctrl + Enter cheile împreună.

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

Formula este prea complicată pentru a ne aminti? Salvați formula ca intrare Text automat pentru reutilizare cu un singur clic în viitor! Citeste mai mult…     Încercare gratuită

Dacă aveți instalat Kutools pentru Excel, îl puteți aplica cu ușurință Găsiți cea mai mare valoare a virgulelor formula pentru a obține rapid cea mai frecventă valoare dintr-o listă sau coloană din Excel.

1. Selectați o celulă goală în care veți plasa valoarea găsită și faceți clic Kutools > Formula Helper> Formula Helper.

2. În caseta de dialog Formula Helper, alegeți Căutare de la Tipul formulei lista derulantă, faceți clic pentru a selecta Găsiți cea mai comună valoare în Alegeți o formulă , specificați lista / coloana în Gamă și faceți clic pe butonul Ok buton. Vedeți captura de ecran:

Și apoi veți vedea că cele mai frecvente / frecvente valori au fost găsite și plasate în celula selectată. Vedeți captura de ecran:

Cu următorul cod VBA, nu numai că puteți găsi cea mai mare valoare, ci și să numărați numărul de ori pentru cel mai comun cuvânt.

1. Țineți apăsat butonul ALT + F11 tastele și deschide fișierul Fereastra Microsoft Visual Basic pentru aplicații.

2. Clic Insera > Moduleși lipiți următorul cod în Fereastra modulului.

Cod VBA: găsiți cea mai comună valoare dintr-o listă

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. Apoi apăsați F5 pentru a rula acest cod și va apărea o casetă de prompt pentru a vă reaminti să selectați intervalul pe care doriți să îl utilizați. Vedeți captura de ecran:

4. Apoi faceți clic pe OK, veți primi o casetă de prompt care afișează următoarele informații: