EXCEL数据去重（每列）。
答案:4 悬赏:0 手机版
解决时间 2021-04-04 21:57
- 提问者网友：我是女神我骄傲
- 2021-04-03 22:48
EXCEL数据去重（每列）。
最佳答案
- 五星知识达人网友：老鼠爱大米
- 2021-04-04 00:10
你这个可以用VBA来实现，代码如下：
Sub xxx()
Dim i, d, n
Set d = CreateObject("Scripting.Dictionary")
For i = 1 To UsedRange.Rows.Count
n = Cells(i, 1)
If d.Exists(n) Then
Cells(i, 2) = ""
Else
d(n) = True
End If
Next i
End Sub
Sub xxx()
Dim i, d, n
Set d = CreateObject("Scripting.Dictionary")
For i = 1 To UsedRange.Rows.Count
n = Cells(i, 1)
If d.Exists(n) Then
Cells(i, 2) = ""
Else
d(n) = True
End If
Next i
End Sub
全部回答
- 1楼网友：从此江山别
- 2021-04-04 02:58
选择B列 然后点击数据---筛选---高级筛选-----勾选下最下面的“选择不重复记录”
- 2楼网友：空山清雨
- 2021-04-04 01:40
c1=IF(COUNTIF(B$1:B1,B1)=1,B1,"空")
公式下拉填充
复制C列
点击B列>右键>选择性粘贴>数值>确定
删除C列
公式下拉填充
复制C列
点击B列>右键>选择性粘贴>数值>确定
删除C列
- 3楼网友：北方的南先生
- 2021-04-04 00:55
c1输入=if(countif(b$1:b1,b1)=1,b1,"")
公式下拉
复制C列
点击B列>右键>选择性粘贴>数值>确定
删除C列
公式下拉
复制C列
点击B列>右键>选择性粘贴>数值>确定
删除C列
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯