如何從 Excel 的多個列中提取唯一值？

如果您經常處理分散在 Excel 多個列中的數據集，您可能會遇到某些值在同一列內或不同列之間重複的情況。在許多報告或數據分析任務中，有必要識別並提取所有唯一值——即在整個選擇範圍內僅出現一次的值，無論它們位於何處。手動執行此操作可能既耗時又容易出錯，特別是在處理大型數據集或複雜表格時。幸運的是，Excel 提供了多種方法來高效地提取這些唯一值。

本指南介紹了幾種解決方案，您可以根據自己的 Excel 版本和偏好使用——例如適用於所有版本的公式、適用於最新版本的動態數組公式、使用 Kutools AI 助手獲得直觀結果、使用數據透視表進行可視化整合，以及在複雜場景中使用 VBA 代碼進行自動提取。

• 使用公式從多個列中提取唯一值
  • 數組公式（所有 Excel 版本）
  • 公式（Excel 365、Excel 2021 及更新版本）
• 使用 Kutools AI 助手從多個列中提取唯一值
• 使用數據透視表從多個列中提取唯一值
• 使用 VBA 代碼從多個列中提取唯一值

使用公式從多個列中提取唯一值

有時候，您希望使用內置的 Excel 函數來實現這種提取。本節詳細介紹了如何使用兩種方法來實現：一種適用於所有 Excel 版本的數組公式，以及另一種適用於較新版本（如 Excel 365 和 Excel 2021）的動態數組公式。這些方法非常適合當您想要直接的基於公式的解決方案、需要頻繁更新以適應數據變化，或需要避免外部插件或代碼時使用。

使用適用於所有 Excel 版本的數組公式從多個列中提取唯一值

為了兼容所有 Excel 版本，使用數組公式可以讓您從多個列中提取唯一值——即使您的 Excel 不支持動態數組。此方法利用 INDIRECT、TEXT、MIN、IF、COUNTIF、ROW 和 COLUMN 函數的組合，使其適用於各種數據結構。

假設您的數據位於 A2:C9 區域。若要從 E2 開始提取唯一值，請按照以下步驟操作：

1. 點擊 E2 單元格（或輸出範圍的第一個單元格），然後輸入以下數組公式：

=INDIRECT(TEXT(MIN(IF(($A$2:$C$9<>"")*(COUNTIF($E$1:E1,$A$2:$C$9)=0),ROW($2:$9)*100+COLUMN($A:$C),7^8)),"R0C00"),)&""

2. 輸入公式後，不要只按 Enter，而是同時按 Ctrl + Shift + Enter 確認其為數組公式。正確執行時，公式欄中會出現大括號 {} 包圍您的公式。然後，從 E2 向下拖動填充柄。繼續拖動直到出現空白單元格，這表明沒有更多唯一值可供提取。這個過程確保所有唯一值都將顯示在目標列中。

使用适用于 Excel 365、Excel 2021 及更新版本的公式从多个列中提取唯一值

如果您使用 Excel 365、Excel 2021 或更新版本，则可以访问动态数组函数，这提供了一种更简单、更直观的方法来从多个列中提取唯一值。UNIQUE 和 TOCOL 函数使得跨列合并数据并一步消除重复项变得更加容易和快速——这对于处理不断更新或更大数据集的用户来说尤其有用。

要使用这种方法，只需选择一个空白单元格（例如，E2，或者您希望结果出现的任何地方），输入此公式，然后按 Enter：

=UNIQUE(TOCOL(A2:C9,1))

按下 Enter 后，来自范围 A2:C9 的所有唯一值将自动溢出到公式下方的单元格中。这一功能特别高效——输出会随着源数据的变化动态更新，为您节省手动刷新步骤。

使用 Kutools AI 助手从多个列中提取唯一值

如果您希望采用更简化的方法并减少手动操作，Kutools for Excel 中的 Kutools AI 助手可以帮助您轻松从多个列中提取唯一值。如果您不熟悉公式或希望避免公式错误的风险，这种方法尤其有价值。Kutools AI 助手会解释您的指令并自动处理数据，非常适合初学者和寻求点击几下即可快速解决的用户。

安装后，点击 Kutools AI > AI 助手以打开“Kutools AI 助手”窗格：

1. 在聊天框中输入您的请求，例如：“从范围 A2:C9 中提取唯一值，忽略空白单元格，并将结果放置在 E2 开始：”
2. 点击“发送”或按 Enter，然后在 AI 分析请求后，只需点击“执行”即可运行。结果将立即出现在您的工作表中，就在您指示的确切位置。

提示：如果您的数据提取工作流程有所不同，或者您希望使用自然语言处理功能，此解决方案非常有用。请记住，如果您的原始数据不完全一致，请仔细检查提取的列表是否有空白单元格，因为根据您的 AI 请求详情，空白条目可能会被包括或过滤掉。

使用数据透视表从多个列中提取唯一值

数据透视表是另一种方便的方法，用于提取唯一值，特别是如果您喜欢使用可视化工具并希望汇总或进一步分析唯一项（例如计数）。这种方法简单直接，不需要公式。但是，它需要一些设置步骤和轻微的数据重新排列，尤其是当涉及的列具有不同的标题时。

以下是使用数据透视表提取唯一值的建议过程：

1. 在数据左侧插入一个新的空白列。例如，如果您的数据从 B 列开始，则插入一个新 A 列。这种调整有助于确保正确的范围合并。

2. 选择数据集中的任意单元格，按 Alt + D，然后迅速按 P 启动“数据透视表和数据透视图向导”。在向导的第一步中，选择“多重合并区域”。这允许您将众多列中的值合并为一个汇总字段。

3. 点击下一步，然后选择“为我创建一个单一页面字段。”这一步将所有数据组织为一个组，以便更容易提取唯一值。

4. 在下一步中，选择整个数据范围（包括新的空白列），点击添加按钮将您的选择加入“所有范围”列表，然后点击下一步。

5. 在向导的最后一步中，选择您希望放置数据透视表的位置（新工作表或现有工作表），然后点击完成以生成数据透视表报告。

6. 在新的数据透视表中，取消选中“选择要添加到报告的字段”部分中的所有字段以清除默认视图。

7. 最后，将“值”字段拖到行区域。数据透视表将以整齐的单列形式显示原始多列范围中的所有唯一值。

使用 VBA 代码从多个列中提取唯一值

在需要自动化提取或处理大型和不规则数据集的情况下，使用 VBA（Visual Basic for Applications）代码可以提供快速且可重复使用的解决方案。这对于对 Excel VBA 编辑器有一定了解的用户，或希望最小化手动操作的重复任务非常理想。VBA 还可以比数组公式更高效地处理大量数据。

1. 按 Alt + F11 打开 VBA 编辑器。在出现的“Microsoft Visual Basic for Applications”窗口中，点击插入 > 模块以添加一个新模块。

2. 在新模块中，粘贴以下代码：

VBA：从多个列中提取唯一值

Sub Uniquedata()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
Set dt = CreateObject("Scripting.Dictionary")
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
For Each rng In InputRng
    If rng.Value <> "" Then
        dt(rng.Value) = ""
    End If
Next
OutRng.Range("A1").Resize(dt.Count) = Application.WorksheetFunction.Transpose(dt.Keys)
End Sub

3. 按 F5 运行代码。将出现一个对话框提示您选择数据范围。选择所有相关列（包括任何带有空白单元格的列）。

4. 点击确定后，另一个提示会询问您在哪里输出唯一值。指定一个顶部单元格，您希望在此列出结果（例如，E2）。

5. 点击确定，宏将自动运行。所有唯一值将从您指定的位置开始出现。

更多相关文章：