Conan,
Try something like
If ActiveWindow.SelectedSheets.Count 1 Then
ActiveWindow.SelectedSheets(1).Select
End If
--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting LLC
www.cpearson.com
(email on the web site)
"Conan Kelly" wrote in message
...
Hello all,
(Using XL 2002)
How would I test for Grouped Sheets and then ungroup them if they are
grouped.
Thanks for any help anyone can provide,
Conan Kelly