Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA code to ungroup multiple groupings
For example: Say I have a spreadsheet with 3 layers of row grouping.
Currently I'm using the following code to ungroup all 3 layers, which works for the this particular example. Selection.Rows.Ungroup Selection.Rows.Ungroup Selection.Rows.Ungroup Unfortunately the spreadsheet in question does not always have 3 layers of grouping, it may have more it may have less. Which either cause the VBA to error or not remove all the groupings. Is there any coding that will remove all groupings within a worksheet without reference to the # of layers? Thanks in advance! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA code to ungroup multiple groupings
Sub BruteForce()
On Error Resume Next For I=1 to 8 Selection.Rows.Ungroup Next End Sub "CM4@FL" wrote in message ... For example: Say I have a spreadsheet with 3 layers of row grouping. Currently I'm using the following code to ungroup all 3 layers, which works for the this particular example. Selection.Rows.Ungroup Selection.Rows.Ungroup Selection.Rows.Ungroup Unfortunately the spreadsheet in question does not always have 3 layers of grouping, it may have more it may have less. Which either cause the VBA to error or not remove all the groupings. Is there any coding that will remove all groupings within a worksheet without reference to the # of layers? Thanks in advance! |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA code to ungroup multiple groupings
On Error GoTo done
Do While Rows.Ungroup Loop done: "CM4@FL" wrote: For example: Say I have a spreadsheet with 3 layers of row grouping. Currently I'm using the following code to ungroup all 3 layers, which works for the this particular example. Selection.Rows.Ungroup Selection.Rows.Ungroup Selection.Rows.Ungroup Unfortunately the spreadsheet in question does not always have 3 layers of grouping, it may have more it may have less. Which either cause the VBA to error or not remove all the groupings. Is there any coding that will remove all groupings within a worksheet without reference to the # of layers? Thanks in advance! |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA code to ungroup multiple groupings
How many groupings do you have? Are you trying to get rid of them all? Does
this, perhaps, do what you want? Selection.Rows.ClearOutline -- Rick (MVP - Excel) "CM4@FL" wrote in message ... For example: Say I have a spreadsheet with 3 layers of row grouping. Currently I'm using the following code to ungroup all 3 layers, which works for the this particular example. Selection.Rows.Ungroup Selection.Rows.Ungroup Selection.Rows.Ungroup Unfortunately the spreadsheet in question does not always have 3 layers of grouping, it may have more it may have less. Which either cause the VBA to error or not remove all the groupings. Is there any coding that will remove all groupings within a worksheet without reference to the # of layers? Thanks in advance! |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA code to ungroup multiple groupings
Hey Rick,
I didn't understand your post under "VBA mid() function" on 11/2/09. Did I miss something? "Rick Rothstein" wrote: How many groupings do you have? Are you trying to get rid of them all? Does this, perhaps, do what you want? Selection.Rows.ClearOutline -- Rick (MVP - Excel) "CM4@FL" wrote in message ... For example: Say I have a spreadsheet with 3 layers of row grouping. Currently I'm using the following code to ungroup all 3 layers, which works for the this particular example. Selection.Rows.Ungroup Selection.Rows.Ungroup Selection.Rows.Ungroup Unfortunately the spreadsheet in question does not always have 3 layers of grouping, it may have more it may have less. Which either cause the VBA to error or not remove all the groupings. Is there any coding that will remove all groupings within a worksheet without reference to the # of layers? Thanks in advance! . |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA code to ungroup multiple groupings
I responded to your message back in the original thread... are you saying
you can't see it? Here it is again... "No, you didn't miss anything... I did. Sorry for the confusion, but apparently I misread the original post and then made my comment based on my misreading." -- Rick (MVP - Excel) "Charlie" wrote in message ... Hey Rick, I didn't understand your post under "VBA mid() function" on 11/2/09. Did I miss something? "Rick Rothstein" wrote: How many groupings do you have? Are you trying to get rid of them all? Does this, perhaps, do what you want? Selection.Rows.ClearOutline -- Rick (MVP - Excel) "CM4@FL" wrote in message ... For example: Say I have a spreadsheet with 3 layers of row grouping. Currently I'm using the following code to ungroup all 3 layers, which works for the this particular example. Selection.Rows.Ungroup Selection.Rows.Ungroup Selection.Rows.Ungroup Unfortunately the spreadsheet in question does not always have 3 layers of grouping, it may have more it may have less. Which either cause the VBA to error or not remove all the groupings. Is there any coding that will remove all groupings within a worksheet without reference to the # of layers? Thanks in advance! . |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA code to ungroup multiple groupings
Thanks. No, it never posted. Or at least I can't find it. I thought I was
losing my mind. (Again.) :) "Rick Rothstein" wrote: I responded to your message back in the original thread... are you saying you can't see it? Here it is again... "No, you didn't miss anything... I did. Sorry for the confusion, but apparently I misread the original post and then made my comment based on my misreading." -- Rick (MVP - Excel) "Charlie" wrote in message ... Hey Rick, I didn't understand your post under "VBA mid() function" on 11/2/09. Did I miss something? "Rick Rothstein" wrote: How many groupings do you have? Are you trying to get rid of them all? Does this, perhaps, do what you want? Selection.Rows.ClearOutline -- Rick (MVP - Excel) "CM4@FL" wrote in message ... For example: Say I have a spreadsheet with 3 layers of row grouping. Currently I'm using the following code to ungroup all 3 layers, which works for the this particular example. Selection.Rows.Ungroup Selection.Rows.Ungroup Selection.Rows.Ungroup Unfortunately the spreadsheet in question does not always have 3 layers of grouping, it may have more it may have less. Which either cause the VBA to error or not remove all the groupings. Is there any coding that will remove all groupings within a worksheet without reference to the # of layers? Thanks in advance! . . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
ungroup workbooks into multiple instances of excel | Excel Discussion (Misc queries) | |||
Cell Groupings | Excel Worksheet Functions | |||
Excel should allow tab groupings. | Excel Discussion (Misc queries) | |||
Subtotals/Groupings | Excel Worksheet Functions | |||
Groupings | Excel Programming |