如何在Excel VBA中保存含嵌套集合的类实例至文件？

我有一个类似Git分支结构的Excel项目，定义了包含嵌套Collection的主类及子类实例：

主类代码 #

Private member1 as String
Private member2 as String
Private list as Collection

Public Sub Initialize()
'Some code
End sub

Public sub Foo()
'Some code
End sub

其中list的每个元素是Collection，该Collection的元素又是包含类模块实例的Collection，子类代码如下：

子类代码 #

Private member1 As String
Private member2 As collection
Private member3 As collection
Private member4 As Integer
Private member5 As String
Private member6 As Statut_Enum

Sub foo()
'Some code
end Sub

对象结构为：

Main object : 
  Member1
  Member2
  List:
    SubList1:
      SubSubList1:
        instanceOfClassModule1
        instanceOfClassModule2
      SubSubList2:
        instanceOfClassModule1
        instanceOfClassModule2
    SubList2
      SubSubList1:
        instanceOfClassModule1
        instanceOfClassModule2

我希望将整个主类实例及其嵌套集合/对象保存到文件中，以便下次打开Excel时加载。请问是否可行，还是需要自行编写读写函数？

VBA没有原生支持复杂嵌套对象（含自定义类、嵌套Collection）的直接序列化与反序列化功能，所以无法直接将整个主类实例保存到文件，必须自行编写读写函数来实现。

具体可以参考以下几种实现思路：

• 自定义文本/XML格式：递归遍历主对象的所有成员、嵌套Collection及子类实例，将每个属性的值按约定格式（比如分隔符文本、XML节点）写入文件；加载时反向读取内容，逐一重建对象层级。
• JSON序列化：借助VBA的JSON处理模块，把嵌套对象结构转换为JSON字符串保存到文件；加载时解析JSON，再将数据映射回对应的类实例和Collection。
• 二进制文件存储：将对象各属性值按二进制格式写入文件，加载时按对应格式读取并赋值，适合对性能或文件体积有要求的场景。

需要注意：自定义枚举Statut_Enum要存储其字符串或数字值，加载时再转回枚举类型；嵌套Collection必须递归处理，确保所有层级的对象都被正确持久化。

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