Excel is an excellent tool, pardon the half pun :) Automation is one of my favorite things about excel. Have you ever found yourself getting copy paste blindness, adding hundreds if not thousands of fields to an excel sheet. Using this handy Macro you can save yourself some time and get back to the real work.

The Macro Code – Insert_Multiple_Rows()


Sub Insert_Multiple_Rows()
Dim CurrentSheet As Object
For Each CurrentSheet In ActiveWindow.SelectedSheets
' Insert rows, here a1 is the start point and a10001
CurrentSheet.Range("a1:a10001").EntireRow.Insert
Next CurrentSheet
End Sub


If you need to find out more about Macros and how to run them check out a previous post Convert URLs to Clickable Links In Excel.

Useful Excel Links

• For more general Excel lessons, tips and tricks check out office.com
• Macro info from about.com