当前位置: 首页
excel编程vba中的字典用法CreateObject("Scripting.Dictionary")2017-11-09 09:58:59.0工作中用到vba统计学生成绩,遇到一个需要暂时存储信息的问题。网上搜索解决方法时看到了一个“字典”的对象,感觉很像java编辑中的集合map对象,有键有值成对存储数据。感觉非常有意思。特意搜了一下“字典”的简章说明、用法,记录到这里。即可以以后再用的时候查阅,也可以推广给大家学习。自己的vba知识又多了一点,字典、数组,都用过了。 这是我看到的最简单明了的Excel VBA字典(dictionary)的教程,把字典的应用,用短短几百字,全部道尽,简!但精彩!原文如下: 当年我(原作者:彭希仁)向LDY版主求教字典的时候,他老人家总结了一句话“呼之即来,挥之即去” 一、定义字典 Set d = CreateObject("Scripting.Dictionary") 二、呼之即来,挥之即去 d("张三“)=1 '相当于给字典赋值,张三过来(没有就生成)拿个1站一边去 s=d("张三") 's=1 即叫了声张三,张三就告诉你他拿的是1 三、将字典里的东西变成数组 arr= d.Keys '把名字的集合按先来后到的原则放到一维数组里 arr(0)=“张三” ; arr(1)=“李四” ; arr(2)=“麻子” 四、查找字典中有没有这个人 s=d.Exists(“张三”) 's=True 有的 五、清空数组 d.RemoveAll |