| Home |
| Search |
| Today's Posts |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Auto insert blank rows
Hi Merjet
That appears to work fine. Thanks very much for your help "merjet" wrote: Sub InsertRows_() Dim iEnd As Long Dim iRow As Long iEnd = Range("A1").CurrentRegion.Rows.Count For iRow = iEnd To 1 Step -1 Rows(iRow + 1).Insert xlShiftDown Next iRow End Sub Merjet |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How do i insert blank rows between data that is thousands of rows | Excel Discussion (Misc queries) | |||
| Auto insert of blank row depending on data | Excel Discussion (Misc queries) | |||
| Auto insert of blank lines | Excel Discussion (Misc queries) | |||
| How do I insert blank rows between rows in completed worksheet? | Excel Discussion (Misc queries) | |||
| auto insert blank line | Excel Discussion (Misc queries) | |||
Threaded Mode
