Excel提取唯一值公式详解

✅ 实战案例：B列生成唯一客户名（原始数据A2:A100）

=IFERROR(INDEX($A$2:$A$100, MATCH(0, COUNTIF($B$1:B1, $A$2:$A$100), 0)), "")

操作步骤：

1. 输入公式后按 Ctrl+Shift+Enter（旧版需数组公式）
2. 下拉填充至空白单元格
3. 当结果为""时停止

原理拆解：
• COUNTIF($B$1:B1, $A$2:$A$100)：统计A列各值在B列已出现次数
• MATCH(0, ..., 0)：找到第一个“未出现”的值（即首次出现位置）
• INDEX(..., position)：提取该位置原始值

✅ 实战案例：提取2023年成交客户的唯一邮箱

=UNIQUE(FILTER(B2:B100, (A2:A100>=DATE(2023,1,1))(A2:A100<=DATE(2023,12,31))(C2:C100="成交")))

逻辑：
1. FILTER筛选：日期在2023年且状态为“成交”的记录
2. UNIQUE提取邮箱列（B列）的唯一值

扩展技巧：可嵌套IFERROR处理无结果情况：
=IF(ROWS($D$1:D1)>COUNTA(UNIQUE(...)), "", UNIQUE(...))

✅ 操作步骤：

1. 数据区域 → 选择“从表格/区域”（快捷键：Ctrl+T → 确认）
2. Power Query编辑器中：右键列标题 → 选择“删除重复项”
3. 文件菜单 → 关闭并上载至工作表

优势：
• 自动记录步骤，下次更新数据一键刷新
• 支持100万+行数据（远超公式限制）
• 可合并多个数据源再提取唯一值

✅ 实战案例：统计各产品唯一销量

1. 插入 → 数据透视表 → 选择数据区域
2. 拖拽“产品名称”到“行”区域
3. 拖拽“销量”到“值”区域（默认求和）

技巧：
• 行区域右键 → “显示报表筛选页”可拆分唯一值
• 双击汇总值可生成明细表（含唯一值+原始数据）

✅ 注意事项：

• 勾选“数据包含标题”避免误删首行
• 可多列组合去重（如“姓名+身份证号”）
• 操作不可逆！建议先备份工作表

结果：原始数据被修改，仅保留唯一行（非新列表）

✅ 典型用法：

• 源区域：A1:A100（含标题行）
• 复制到：D1（新位置首单元格）
• 勾选“唯一记录” → 确定

优势：保留原始数据，结果直接输出到指定位置

✅ 实战案例：

=TEXTJOIN(";", TRUE, UNIQUE(A2:A100))

效果：将A2:A100的唯一值用分号连接成字符串

进阶技巧：用SORT函数排序：
=TEXTJOIN(";", TRUE, SORT(UNIQUE(A2:A100)))

✅ 两步走策略：

1. 辅助列（C列）：=IF(COUNTIF($A$2:A2, A2)=1, 1, 0)
   → 标记首次出现的值（1=唯一首次）
2. 提取列（D列）：=IFERROR(INDEX($A$2:$A$100, MATCH(1, $C$2:$C$100, 0)), "")
   → 用MATCH定位标记为1的位置

优势：逻辑清晰，适合教学与复杂场景嵌套

✅ VBA代码示例：

Function GetUnique(rng As Range) As Variant
    Dim dict As Object
    Set dict = CreateObject("Scripting.Dictionary")
    Dim cell As Range
    For Each cell In rng
        If cell.Value <> "" And Not dict.Exists(cell.Value) Then
            dict.Add cell.Value, 1
        End If
    Next cell
    GetUnique = Application.Transpose(dict.Keys)
End Function

使用方式：
在工作表输入 =GetUnique(A2:A100) → 按Ctrl+Shift+Enter填充数组