求教vba怎么往字典里加自定义类的对象

字典可以保留对象，自定义类也可以，下面的语句保留WorkSheet、Range的例子：

Dim d as Object, w as WorkSheet, r as Range

Set d=CreateObject("Scripting.Dictionary")

set w=ActiveSheet

set r=Range("a1")

d.Add 'sheet', w

d.add 'range', r

在VBA中使用字典分为前期绑定和后期绑定两种方式，

一、前期绑定：打开VBE编辑器，按下图 *** 作，勾选相应选项就可以直接使用字典了。

二、后期绑定：如下代码即创建了一个名称为d的字典。

Set d = CreateObject("scripting.dictionary")

---