首页手机软件手机游戏单机游戏资讯文章专题下载游戏合集文章合集 php下载 php教程电脑软件

+ -

当前位置：首页 → 问答吧 → 如何运行一个宏就能在表中筛选出重复的数据？

如何运行一个宏就能在表中筛选出重复的数据？

时间：2011-08-12

来源：互联网

我想知道如何从表里把A1列的数据筛选出重复的，希望高手给予解答。谢谢

作者: chen556677 发布时间: 2011-08-12

到底是获得重复的值还是剔除重复值获取唯一值-----即不重复值

作者: yangrongguan 发布时间: 2011-08-12

获取唯一值不好意思我没说明白

作者: chen556677 发布时间: 2011-08-12

获取唯一值不好意思我没说明白

作者: chen556677 发布时间: 2011-08-12

是在另一列生成唯一值还是就在原列留下唯一值其余删除

作者: yangrongguan 发布时间: 2011-08-12

获取唯一值不好意思我没说明白

作者: chen556677 发布时间: 2011-08-12

Sub tigansh()
Dim i&, Myr&, Arr
Set d = CreateObject("Scripting.Dictionary")
Myr = Sheet1.[a65536].End(xlUp).Row
Arr = Sheet1.Range("a1:a" & Myr)
For i = 1 To UBound(Arr)
d(Arr(i, 1)) = ""
Next
Range("B1").Resize(d.Count, 1) = Application.Transpose(d.keys)
End Sub

作者: wkbu 发布时间: 2011-08-12

在另一列留下不是重复的重复的全部删除

作者: chen556677 发布时间: 2011-08-12

引用:

原帖由 chen556677 于 2011-8-12 19:33 发表
在另一列留下不是重复的重复的全部删除

重复的全部删除
解释1：1、2、3、5、5、6，中的两个5全删除
解释2：1、2、3、5、5、6，中的两个5删除一个重复值，留下一个。
不知道我的表达对不对。

作者: wkbu 发布时间: 2011-08-12

[quote]原帖由 wkbu 于 2011-8-12 19:46 发表

重复的全部删除
解释1：1、2、3、5、5、6，中的两个5全删除
最好是不删除，执行之后用颜色表示重复的。

作者: chen556677 发布时间: 2011-08-12

1、2、3、5、6大概是这个意思吧

作者: wkbu 发布时间: 2011-08-12

唯一重复.rar (10 KB)

作者: wkbu 发布时间: 2011-08-12

...............

附件

获得A列不重复值.rar(12.55 KB)

2011-8-12 20:16, 下载次数: 0

作者: yangrongguan 发布时间: 2011-08-12

相关阅读更多

热门阅读

office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐附激活工具
阅读：74
如何安装mysql8.0
阅读：31
Word快速设置标题样式步骤详解
阅读：28
20+道必知必会的Vue面试题（附答案解析）
阅读：37
HTML如何制作表单
阅读：22
百词斩可以改天数吗？当然可以，4个步骤轻松修改天数！
阅读：31
ET文件格式和XLS格式文件之间如何转化？
阅读：24
react和vue的区别及优缺点是什么
阅读：121
支付宝人脸识别如何关闭?
阅读：21
腾讯微云怎么修改照片或视频备份路径?
阅读：28

热门下载

更多