隐藏/取消隐藏特定组

Question

我想创建一个按钮来隐藏和取消隐藏VBA的特定组。我的代码将隐藏或取消隐藏指定级别中的所有组：

Sub Macro1()
ActiveSheet.Outline.ShowLevels RowLevels:=2
End Sub

假设我只是想取消隐藏分组级别2中的第二组，我该怎么做？

Answer 1

在分组级别2＆＃34;中说出＆＃34;第二组;是第7-10行。然后这段代码将取消隐藏该组：

rvm --default use 2.4.0

但是，最好将其转换为隐藏/取消隐藏组的切换功能。以下是一个通用切换功能（ToggleOutlineGroup），它允许您通过传递轮廓所在的工作表和行来隐藏/取消隐藏组。该行可以是组中的任何行，前提是它不是另一个子组的一部分。为简单起见，我使用了组的最后一行。 sub foo是如何调用函数的一个例子。

ActiveSheet.Rows(10).ShowDetail = True