Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Insert Rows
I have a spreadsheet that is divided into three sub
sections: 1)Rows(2:5), 2) Rows(8:11), and 3)Rows(14:17). I would like to create the ability for row insertion after data is entered within any of the rows in the subsections. I have the following code: Private Sub Worksheet_Change(ByVal Target As Range) Static RowCounter As Long If Target.Row = 3 + RowCounter Then Rows(Target.Row+1).EntireRow.Insert RowCounter = RowCounter + 1 End If The problem with this code is the fact that if I press ener in a row in section 1, then go to section 3 and press enter, I am in trouble. Is there a fix where I can reset the counter or do I need to take a different approach? |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
insert rows in a worksheet that do not change adjoining rows | Excel Discussion (Misc queries) | |||
How do i insert blank rows between data that is thousands of rows | Excel Discussion (Misc queries) | |||
Insert rows: Formats & formulas extended to additonal rows | Excel Worksheet Functions | |||
How do I insert blank rows between rows in completed worksheet? | Excel Discussion (Misc queries) | |||
How do i insert of spacer rows between rows in large spreadsheets | Excel Discussion (Misc queries) |