EXCEL从一个表（列）中删除另一个表（列）的数据

答案:4 悬赏:60

解决时间 2021-01-11 19:22

提问者网友：精神病院里
2021-01-11 06:07

最佳答案

二级知识专家网友：一把行者刀
2021-01-11 07:01

假设你的数据都在A列，可以在sheet1的B列输入函数
=countif(sheet2!A:A,A1)
然后下拉填充完成B列（双击填充柄就行了）

筛选数值为0的，就是不包含sheet2的数据了
复制粘贴到新表即可

全部回答

1楼网友：迷人又混蛋
2021-01-11 10:43

十几万行，应该是2007了
数据在A列
执行宏
Sub Macro2()
'
' Macro2 Macro
'
'
Dim AA, BB, CC, I
Sheets("Sheet1").Select
Cells.Copy
Sheets("Sheet3").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Sheet2").Select
BB = Range("A1000000").End(xlUp).Row
For J = BB To 1 Step -1
AA = Cells(J, 1).Value
Sheets("Sheet3").Select
CC = Range("A1000000").End(xlUp).Row
For I = CC To 1 Step -1
If AA = Cells(I, 1).Value Then Cells(I, 1).Delete Shift:=xlUp
Next I
Sheets("Sheet2").Select
Next J
End Sub

2楼网友：轻熟杀无赦
2021-01-11 09:17

假设这两列电话号码都在A列，
在sheet1 B1输入=if(type(vlookup(a1,sheet2!a:a,1,false)=16,"不重复","")
然后再筛选sheet1 B列不重复。

3楼网友：拜訪者
2021-01-11 08:31

笨方法如下
sheet2中每个电话号码后插入一列，全部赋值为0
sheet1中电话号码后插入一列，该值等于vlookup() sheet2里面电话号码+0共两列
这样的结果是
sheet2中存在的电话号码会在sheet1中后面多一个0
做一个筛选复制到sheet3就可以啦

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息！