Excel VBA-随机额外分组级别

这实际上不是影响代码的问题，而是表的外观问题。 因此，本表是各业务部门收入和费用记录的汇总。让我们把每个部门称为一种记录。每种类型都有子类型1。每个子类型1都有子类型2，每个子类型2都有子类型3。 所以样本数据应该是这样的

1, Type1, sum of subtypes1
1.1, Subtype1, sum of subtypes2
1.1.1 Subtype2, sum of subtypes3
1.1.1.1 Subtype3, amount
1.1.1.2 Subtype3, amount
1.2, Subtype1, sum of subtypes2
1.2.1, Subtype2, sum of subtypes3
1.2.1.1, Subtype3, amount

每个子类型可以有不同数量的“子类型”。子类型不能超过子类型3

然后，我使用VBA脚本将同一子类型的记录在其直接父项下分组到主类型。一切正常，我可以扩展或隐藏这个结构的每一个层次。 但是，从逻辑上讲，表左侧的行组大纲应显示4个级别。相反，它显示了8个级别的组。前4个级别完全按照您的预期执行，显示或隐藏各自的子类型，而其他4个级别完全不执行任何操作，这也是预期的，因为我看不出它们存在的原因

你知道为什么会创建额外的级别，以及如何消除它们吗？

---

我可能解释得不太清楚，所以请随意询问更多信息。

尝试在跟踪模式下单步查看代码，以查看正在设置的组。（打开VBA窗口并使用F8键一次循环一行）

---

这可能会揭示定义额外组的原因，并建议更改内容。

请显示您的代码。你考虑过使用透视表吗？