Setting up data in a collapsed format

[Cliff]

How do I take data where data is the same in Column A for
Rows 1-18 and I want to collapse those rows where a +
sign would appear when they are collapsed a - sign when
they are not. Any ideas?

 

[Bob Phillips]

Cliff,

I used the macro recorder to get this

Range("A1:A18").Select
Selection.Rows.Group
ActiveSheet.Outline.ShowLevels RowLevels:=1

This can be simplified to

Range("A1:A18").Rows.Group
ActiveSheet.Outline.ShowLevels RowLevels:=1


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)