Expanding the outline of one subtotal

  • Thread starter Thread starter rhody
  • Start date Start date
R

rhody

Hi All,

Does anyone know how to expand the outline in one subtotal? I have a
group of subtotals for which I have used ActiveSheet.Outline.ShowLevels
RowLevels:=2 to display only the summary information. I then search for
one of the subtotals and I want ot expand only that one subtotal. Just
like when you click on the small + button on the side of the sheet.
Recording a macro does not produce anything and selecting the row as a
range and trying to change the outline level also does not work. It
seems you can only change the entire outline by changing RowLevels to
3.

Any ideas?

TIA
Mike
 
I'm not sure how you found that cell/row to unhide, but since you know it, maybe
something like:

Option Explicit
Sub testme99()
Dim myCell As Range
With ActiveSheet
Set myCell = .Range("a16")
myCell.Rows.ShowDetail = True
End With
End Sub

(A16 was a cell that contained a subtotal in my testing.)
 
Back
Top