How can you add a blank row, per every other row, on an entire

excel spreadsheet, without having to go row by row?

You could do it easily with a macro.

Why would you do this?

If for appearance and better readability, just select all rows and double the
height.

Sub InsertRows()
Application.ScreenUpdating = False
Dim numRows As Integer
Dim r As Long
numRows = 1
For r = 2000 To 1 Step -1
ActiveSheet.Rows(r + 1).Resize(numRows).EntireRow.Insert
Next r
Application.ScreenUpdating = True
End Sub

Change the 2000 to whatever range you want.


Gord Dibben MS Excel MVP

On Thu, 29 Jun 2006 15:34:02 -0700, Laura >
wrote:

>excel spreadsheet, without having to go row by row?

"Laura" wrote:

> excel spreadsheet, without having to go row by row?

One way would be to:
1) insert a new column next to your data
2) number the columns 1,3,5,7,etc. (use 'Fill' and then 'Series')
3) number some blank lines 2,4,6,8,etc. (use 'Fill' and then 'Series')
4) sort your data by the new column.
5) delete the new column.