Help to expand 1 grouped outling

[Liz_I3]

Hi
I am working with an excel 2007 worksheet that contains many grouped outlines by row.

I have the below code to show or collapse All outline on a worksheet, but how can I have a button that will take the use to 1 specific outline and expand it, keeping all others collaped.


ActiveSheet.Outline.ShowLevels RowLevels:=1 or 2

Thanks
L

 

[GlennUK]

Yes, like this:

Sub ToggleOutlineDetail()
    Rows(6).ShowDetail = Not Rows(6).ShowDetail
End Sub

 

[Liz_I3]

Thanks Glenn
That did exactly what I wanted
L

 

[GlennUK]

That's great!