两列数据找相同对到眼瞎？筛选不同项复制到手软？今天解锁4种降维打击级核对术，函数法、条件格式、动态数组、VBA核武器全覆盖！从此告别人工核对，财务对账、名单比对效率飙升100倍！

手工核对有多反人类？

第一招：条件格式标记法（3秒可视化）

适用场景：快速高亮相同项/不同项

步骤1：标记相同项

1. 选中列A → 开始 → 条件格式 → 新建规则
2. 选择 “使用公式确定格式”
3. 输入：=COUNTIF($B:$B,A1)>0
4. 设置填充色（如绿色）→ 列A中与B列相同的值自动高亮！

步骤2：标记不同项

1. 选中列A → 新建规则 → 公式：=COUNTIF($B:$B,A1)=0
2. 设置红色边框 → 列A特有项瞬间现形！
3. 重复操作标记列B特有项

第二招：函数比对法（精准提取结果）

场景1：提取两列相同项（交集）

=INDEX(A:A,SMALL(IF(COUNTIF(B:B,$A$1:$A$7)>0,ROW($A$1:$A$7),1000), ROW(A1)))&""

操作详解：

1. 按 Ctrl+Shift+Enter 输入数组公式
2. 下拉填充 → 相同项列表自动生成

场景2：提取A列特有项（差集）

=INDEX(A:A,SMALL(IF(COUNTIF(B:B,$A$1:$A$7)=0,ROW($A$1:$A$7),1000), ROW(A1)))&""

第三招：动态数组法（Excel 365专属）

闪电提取相同项

=FILTER(A2:A1000, COUNTIF(B2:B1000,A2:A1000))

第四招：VBA核武器（万行数据秒杀）

步骤：

1. Alt+F11 打开VBA编辑器 → 插入模块
2. 粘贴代码：

Sub 标记差异()

For i = 1 To Range("A" & Rows.Count).End(xlUp).Row

If Range("B" & i).Value <> Range("A" & i).Value Then

Range("A" & i & ":B" & i).Interior.Color = RGB(255,100,100)

End If

Next

End Sub

3. 回到Excel → Alt+F8 执行宏
   效果：

• 同行数据不同 → 整行标红
• 支持100万行闪电扫描

每日一问：我变成EXCEL大神了嘛

关注我，每日一起学习打卡，日积月累必有成效#打卡##职场干货##office##EXCEL##excel##每日学习#