常见字典用法集锦及代码详解

ydlpc · 发表于 2015-9-29 11:45

楼主好帅啊。

t13564865256 · 发表于 2015-9-29 12:36

很多细节没有说，一般使用是没问题了，但是特殊情况下，细节决定成败。

gaozengxun · 发表于 2015-10-1 10:45

学习学习，温故而知新。

boccn · 发表于 2015-10-9 12:49

谢谢老师！

sucx007 · 发表于 2015-10-9 16:55

解释的非常透彻易懂，顶一下！{:soso_e179:}

gtwlren · 发表于 2015-10-10 10:23

挤个位置上去学习

Ricky_zhaoo · 发表于 2015-10-12 21:42

留记，学习中～

lygx · 发表于 2015-10-24 15:45

老师你好：新手对【实例3 A列中显示1 ~ 1000中被6除余1和余5 的数字中的5 dic.Add i & IIf(Abs(i Mod 6 - 3) = 2, "@", ""), ""】还不理解，特请指教：
1、怎么确定除6的余数就是1和5，而不是2和3或其他；
2、如果要求余2和余4，该怎么写；
3如果是除10余1和余5，又该怎么写？
麻烦了，不胜感激，谢谢！

sbswangrui · 发表于 2015-10-25 08:38

谢谢您的帮助。太好了。

razzil · 发表于 2015-10-29 08:42

玄霜老师，我按照你示例6的写入，
Sub sumup()
Dim d As Object, a, b, j%, w!
Dim ss$, n%, x
Sheet2.UsedRange.Offset(1, 0) = ""
a = Sheet1.Range(Sheet1.[a2], Sheet1.[65536].End(xlUp))
Set d = CreateObject("scripting.dictionary")
运行到这一步set d=时出现424错误要求对象
这是什么原因？请帮我看看，谢谢

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

[原创] 常见字典用法集锦及代码详解