更改新插入的行的分组级别（Excel）

Question

因此，我的excel工作表中有3个分组级别，并且我试图在工作表底部添加一行。我希望新行扩展2级（和1级）分组，但不扩展3级，但是我不知道该怎么做。如果您能帮助我，我将不胜感激。

链接至图片以进行澄清-> https://imgur.com/8ucVHWQ 注意：新行将添加到第16行上方。 第二张图片-> https://imgur.com/a/3w3huh0

谢谢。

Answer 1

尝试此Sub：

Public Sub InsertRowLevel2()
    ActiveCell.EntireRow.Insert
    ActiveCell.EntireRow.OutlineLevel = 3
End Sub

它将插入新行并将其设置为2级。

但是，这是一个非常具体的功能，设计整个算法将是一个更好的主意，例如您不应依赖ActiveCell，除非它将从命令按钮的事件处理程序中调用（并检查ActiveCell是否是您期望的对象，而不是在其他工作簿中）。