应该不是类模块没有被引用,因为如果类模块没有被引用的话,会提示类似“用户定义类型未定义”的信息。弹出对话框“对象变量或with块变量未设置”,很可能是因为您在定义对象变量时没有引用(创建)对象实例,请参考对象类的定义形式:
1、直接定义和实例化(下面假设您要引用的类名称为myClass)
Dim A As New myClass '用关键字New直接声明
2、先定义后实例化
Dim A As myClass
Set A=New myClass '使用关键字Set和New
请仔细检查您的变量定义!