如何在 Excel 中从列表中找出出现次数最多的值（无论是数字还是文本字符串）？

通常，我们可以使用 MODE 函数 (=MODE(A1:A16)) 从一个区域中找出最常见的数字。但此 MODE 函数不适用于文本字符串。要提取出现次数最多的值，您可以使用以下数组公式。操作步骤如下：

在数据旁的空白单元格中输入以下公式，然后同时按下 Shift + Ctrl + Enter 键。

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

公式太复杂记不住？立即保存为自动图文集条目，日后只需单击一次即可轻松重复使用！了解更多……     免费试用

如果您已安装 Kutools for Excel，即可轻松使用其查找最常见值公式，快速从 Excel 列表或列中获取出现频率最高的值。

1. 选择一个空白单元格用于放置查找到的值，然后单击 Kutools > 公式助手 > 公式助手。

2. 在公式助手对话框中，从公式类型下拉列表的 Lookup 分类下，选择查找出现次数最多的值，在选择一个公式列表框中指定目标列表或列，在 Range 框中输入范围，然后单击 Ok 按钮。参见截图：

随后，您将看到最常见的/最频繁的值已被找到并填入所选单元格中。参见截图：

使用以下 VBA 代码，您不仅可以找到出现次数最多的值，还可以统计该最常见词的出现次数。

1. 按住 ALT + F11 键，即可打开 Microsoft Visual Basic for Applications 窗口。

2. 单击 Insert > Module，然后将以下代码粘贴到 Module Window 中。

VBA 代码：从列表中查找最常见的值

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. 然后按 F5 键运行此代码，系统将弹出提示框，提醒您选择要使用的区域。参见截图：

4. 然后单击 OK，即可看到显示以下信息的提示框：