PDA

View Full Version : Solved: Ungrouping Columns if the exsist



khalid79m
02-19-2009, 05:35 AM
How can i say if the active sheet has groupings on then remover them all. (Columns)

Can anyone help with this?

Bob Phillips
02-19-2009, 06:21 AM
On Error Resume Next
Do

Cells.Columns.Ungroup
Loop Until Err.Number <> 0

khalid79m
02-27-2009, 06:18 AM
SPOT ON... thanks mate