Close them all?

ActiveSheet.Outline.ShowLevels columnlevels:=1

Take a look at VBA's help for showlevels--you can specify rows, too.

Michael Wise wrote:

Was wondering if there is a way after data is collected that previously
set up column groups can be closed. Currently if I close them and rerun
the script it will open the groups up and leave them open.

THAdvanceNKS

Michael

--
Michael Wise
------------------------------------------------------------------------
Michael Wise's Profile: http://www.excelforum.com/member.php...fo&userid=6998
View this thread: http://www.excelforum.com/showthread...hreadid=265495

--

Dave Peterson