[原创]VBA筛选非重复值方法比较

820211639 · 发表于 2012-3-9 14:58

{:soso_e179:}

ddavi · 发表于 2012-3-15 20:59

不错啊，很详尽的东西，学习了啊

jdchenjian · 发表于 2012-5-18 22:12

不错，学习了。
第5种方法和字典法效果差不多。
ADO好处是数据量多少对速度影响不大，适用于大量数据。

忧伤的祥子 · 发表于 2012-5-18 22:20

VBA筛选非重复值方法比较

exp13579 · 发表于 2012-6-15 20:23

需要仔细研究后再发言，谢谢！

1122wen · 发表于 2012-7-11 14:08

大家讨论来讨论去的，看的我好晕哦！

youlanyuan · 发表于 2012-7-18 17:26

好东西，谢谢分享，正需要

zdayu · 发表于 2012-8-28 19:56

本帖最后由 zdayu 于 2012-8-28 19:57 编辑

使用字典更快
Private Sub CommandButton1_Click()
t = Timer
Set Dic16 = CreateObject("scripting.dictionary") ' 创建字典
For i = 1 To Sheet1.[n65536].End(xlUp).Row

Dic16(Sheet1.Cells(i, 14).Value) = ""
Next i

Sheet1.Range("z1:z" & i) = Application.Transpose(Dic16.keys)

t1 = Timer - t
MsgBox "用时" & t1

End Sub

wmx12345 · 发表于 2012-8-28 20:15

载入字典，自动覆盖，剩下的就是不重复的

张雄友 · 发表于 2012-8-28 20:15

简直是宝藏，本人看后短命一年都值了。

		自动登录	找回密码
密码			免费注册