| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
add xtra rows to before the subtotal rows.
I need to add 24 rows to each group in column "H" that are the same. It is
stopping on the Do Until. My last row is 1442. I want it to stop there. I don't know how to tell it to keep going until the end. tia, Private Sub PutARowIn() Range("H12").Select Do Until ActiveSheet.Rows.Value = 1442 If ActiveCell.Value = ActiveCell.Offset(-1, 0).Value Then ActiveCell.Offset(1, 0).Select Else ActiveCell.EntireRow.Insert ActiveCell.Offset(2, 0).Select End If Loop End Sub |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
add xtra rows to before the subtotal rows.
see repost
"Janis" wrote: I need to add 24 rows to each group in column "H" that are the same. It is stopping on the Do Until. My last row is 1442. I want it to stop there. I don't know how to tell it to keep going until the end. tia, Private Sub PutARowIn() Range("H12").Select Do Until ActiveSheet.Rows.Value = 1442 If ActiveCell.Value = ActiveCell.Offset(-1, 0).Value Then ActiveCell.Offset(1, 0).Select Else ActiveCell.EntireRow.Insert ActiveCell.Offset(2, 0).Select End If Loop End Sub |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Insert Rows vs SUM() and SUBTOTAL() | Excel Discussion (Misc queries) | |||
| Can you subtotal data in rows? | Excel Worksheet Functions | |||
| Format subtotal rows | Excel Programming | |||
| using SUBTOTAL() on rows that have been hidden | Excel Worksheet Functions | |||
| Hiding Rows within a Subtotal | Excel Programming | |||
Linear Mode
