VBA编译时Error 13类型不匹配问题：原因排查与解决

问题现象 #

• 维护的.dotm文件包含多个类模块，其中4个类实现ChecklistTable接口（接口定义1个属性和3个函数），OverviewChecklistTable是实现类之一
• 未编译状态下代码运行完全正常，但编译后，在ChecklistTableParser类的CreateCorrespondingTable函数中频繁出现Error 13 类型不匹配错误，多数场景下报错触发在Set output = New OverviewChecklistTable代码行
• 报错时的实例创建状态：已成功创建5个ChecklistTable实例（1个ProjectDataChecklistTable + 4个MiscChecklistTable）；偶发场景中仅创建ProjectDataChecklistTable时无报错，后续创建其他类型的实现类实例均触发异常
• 附带现象：编译后的.dotm文件体积比未编译版本大20KB左右；执行无代码修改的特定操作步骤后，文件体积会莫名增加约1KB

初始疑问 #

• 该编译后报错的根本原因是什么？
• VBA中是否应该避免使用接口？

问题根因与解决方案 #

• 排查后确认，问题的核心是**ChecklistTable接口/其实现类与存储这些实例的容器类之间存在循环依赖关系**
• 移除该循环依赖（调整类之间的引用逻辑，打破相互引用的闭环）后，编译后的实例化报错问题彻底解决

内容的提问来源于stack exchange，提问作者lorenz albert