如何在Excel VBA中使用字典Dictionary对象

首先得声明字典对象变量
声明有两种方式一种是前期绑定，dim d as new dictionary,另一种是后期绑定，set d=createobject("scripting.dictionary")
字典对象的属性
d.count(是返回字典对象中项目数）
d.key(字典对象中的关键字）
d.item(字典对象中key对应的条目）
d.comparemode(字典查询方式，有三种，用数字代表为0,1,2，0为精确比较，1为模糊比较）
字典对象的方法
d.add （向字典中写入一个关键字项目对）
d.exists （对象中存在的关键字返回true，否则返回false）
d.keys(返回一个一维数组，全部的关键字）
d.items(返回一个一位数组，全部的项目)
d.remove(从字典中清楚一个关键字项目对）
d.removeall(从字典对象中清楚所有的项目对）
通过熟练的掌握VBA字典技术可以处理数据的重复和汇总等要求。

set d=CreateObject("Scripting.Dictionary")
这样就建立了一个字典d，然后可以赋值和查询，例如：
d("a")=1
d("b")=2
也可以判断：if d.Exists("c") then ...