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

19811123lxys · 发表于 2010-10-19 21:07

哈，这两段代码对我来说很有用：

“Arr = Sheet1.Range("a1:g" & Myr)：把表1的A1到G列最后一行不为空白的单元格区域的值赋给变量Arr。这样Arr就是个二维数组了，用数组替代单元格引用可对执行代码的速度提高很多很多。
”

“d(Arr(i, 3)) = d(Arr(i, 3)) + 1 ：Arr(i,3)”
----这一个语句对于我这个初学者来说，真是神来之笔啊，佩服

快乐的悲哀 · 发表于 2010-10-19 21:42

谢谢分享了，学习中……

又见清风 · 发表于 2010-10-19 22:14

hoho
才两天就跟帖这么多了
大家都很好学嘛

yvhgydn · 发表于 2010-10-19 23:55

“d(Arr(i, 3)) = d(Arr(i, 3)) + 1 ”
----这一个语句对于我这个初学者来说，真是神来之笔啊，佩服

蓝兄能否详细解一下这句
arr(i,3)="姓名"
d(arr(i,3))开始的时候为什么就会为空了呢
并且好象没有d(key)这样的写法，前面不是说了要使用D.ADD KEY,ITEM 的方法么

gboffice · 发表于 2010-10-20 01:25

终于回来了

爱情 · 发表于 2010-10-20 06:41

谢谢老师，跟老师一起进步。

ssjun-ssjun · 发表于 2010-10-20 06:57

学习了解，谢谢1

HB2005SCN · 发表于 2010-10-20 08:16

顶，认真学习

thtfzhaobo · 发表于 2010-10-20 09:19

支持，授人以渔

chengcheng_1954 · 发表于 2010-10-20 09:23

虽然看不懂，留着学习。感谢老师！

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

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