How can you add a blank row, per every other row, on an entire
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?
|