| Home |
| Search |
| Today's Posts |
|
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Insert a rows automatically
On Fri, 30 Oct 2009 08:47:02 -0700, ryguy7272
wrote: The trick is to start from the bottom and work up. Sub Insert_Blank_Rows() 'Select last row in worksheet. Selection.End(xlDown).Select Do Until ActiveCell.Row = 1 'Insert blank row. ActiveCell.EntireRow.Insert shift:=xlDown 'Move up one row. ActiveCell.Offset(-1, 0).Select Loop End Sub HTH, Ryan--- Find my dynamic named range post and kill that bird too! |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How do I automatically insert rows | Excel Discussion (Misc queries) | |||
| Automatically insert rows with formula | Excel Worksheet Functions | |||
| Automatically Insert New Rows | Excel Discussion (Misc queries) | |||
| Automatically insert/delete rows to be x apart | Excel Discussion (Misc queries) | |||
| how do you have rows automatically insert in excel? | Excel Worksheet Functions | |||
Threaded Mode
